home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
You can browse this item here: sys_fx
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 60 03 00 00 c0 03 00 00 |Archive.|`.......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 73 79 73 66 78 00 | 00 00 00 00 ff ff ff ff |.!sysfx.|........|
|00000070| 46 fd ff ff 09 88 fb 1e | 00 00 00 00 ff ff ff ff |F.......|........|
|00000080| 3c 03 00 80 82 21 42 6f | 6f 74 00 00 fd fd fd fd |<....!Bo|ot......|
|00000090| 3a 00 00 00 41 eb ff ff | f3 ad fc 8c 03 00 b7 9e |:...A...|........|
|000000a0| 3a 00 00 00 24 00 00 00 | 82 21 52 75 6e 00 47 00 |:...$...|.!Run.G.|
|000000b0| fd fd fd fd 5a 00 00 00 | 41 eb ff ff 13 06 11 8f |....Z...|A.......|
|000000c0| 03 00 c0 84 5a 00 00 00 | 82 00 00 00 82 21 53 70 |....Z...|.....!Sp|
|000000d0| 72 69 74 65 73 00 fd fd | d8 03 00 00 41 f9 ff ff |rites...|....A...|
|000000e0| f5 a6 fe 8c 03 00 13 39 | d8 03 00 00 00 01 00 00 |.......9|........|
|000000f0| 82 62 61 73 69 63 70 72 | 6f 67 73 00 ff ff ff ff |.basicpr|ogs.....|
|00000100| 46 fd ff ff 52 88 fb 1e | 00 00 00 00 ff ff ff ff |F...R...|........|
|00000110| 88 02 00 80 82 50 61 72 | 61 6d 65 74 65 72 73 00 |.....Par|ameters.|
|00000120| 00 05 00 00 41 fb ff ff | 0d ab ff 8c 03 00 d7 a0 |....A...|........|
|00000130| 00 05 00 00 fc 04 00 00 | 82 53 79 73 46 58 30 30 |........|.SysFX00|
|00000140| 30 00 00 00 82 0c 00 00 | 41 fb ff ff 7c 2f 09 8d |0.......|A...|/..|
|00000150| 03 00 0c 94 82 0c 00 00 | 20 0a 00 00 82 53 79 73 |........| ....Sys|
|00000160| 46 58 30 31 30 00 00 00 | b1 09 00 00 41 fb ff ff |FX010...|....A...|
|00000170| 93 0b fb 8c 03 00 1f 74 | b1 09 00 00 c6 16 00 00 |.......t|........|
|00000180| 82 53 79 73 46 58 30 31 | 31 00 00 00 95 09 00 00 |.SysFX01|1.......|
|00000190| 41 fb ff ff 9c 70 f7 8c | 03 00 1c 3d 95 09 00 00 |A....p..|...=....|
|000001a0| 9b 20 00 00 82 53 79 73 | 46 58 30 32 30 00 00 00 |. ...Sys|FX020...|
|000001b0| 61 0a 00 00 41 fb ff ff | 24 3e ff 8c 03 00 6a cb |a...A...|$>....j.|
|000001c0| 61 0a 00 00 54 2a 00 00 | 82 53 79 73 46 58 30 32 |a...T*..|.SysFX02|
|000001d0| 31 00 00 00 d5 09 00 00 | 41 fb ff ff 30 4a ff 8c |1.......|A...0J..|
|000001e0| 03 00 cd 4e d5 09 00 00 | d9 34 00 00 82 53 79 73 |...N....|.4...Sys|
|000001f0| 46 58 30 33 30 00 00 00 | b6 0b 00 00 41 fb ff ff |FX030...|....A...|
|00000200| 65 57 ff 8c 03 00 3b bc | b6 0b 00 00 d2 3e 00 00 |eW....;.|.....>..|
|00000210| 82 53 79 73 46 58 30 33 | 31 00 00 00 2d 0b 00 00 |.SysFX03|1...-...|
|00000220| 41 fb ff ff a6 60 ff 8c | 03 00 1c ac 2d 0b 00 00 |A....`..|....-...|
|00000230| ac 4a 00 00 82 53 79 73 | 46 58 30 34 30 00 00 00 |.J...Sys|FX040...|
|00000240| ec 0c 00 00 41 fb ff ff | 3c 6a ff 8c 03 00 37 59 |....A...|<j....7Y|
|00000250| ec 0c 00 00 fd 55 00 00 | 82 53 79 73 46 58 30 34 |.....U..|.SysFX04|
|00000260| 31 00 00 00 55 0c 00 00 | 41 fb ff ff de 72 ff 8c |1...U...|A....r..|
|00000270| 03 00 2d 0a 55 0c 00 00 | 0d 63 00 00 82 53 79 73 |..-.U...|.c...Sys|
|00000280| 46 58 30 35 30 00 00 00 | ec 0d 00 00 41 fb ff ff |FX050...|....A...|
|00000290| 47 3b 74 8e 03 00 57 b9 | ec 0d 00 00 86 6f 00 00 |G;t...W.|.....o..|
|000002a0| 82 53 79 73 46 58 30 35 | 31 00 00 00 1d 0e 00 00 |.SysFX05|1.......|
|000002b0| 41 fb ff ff 3f 08 10 8e | 03 00 36 2f 1d 0e 00 00 |A...?...|..6/....|
|000002c0| 96 7d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.}......|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 64 02 00 00 | 82 6d 79 73 70 72 69 74 |....d...|.mysprit|
|000002f0| 65 73 00 fd ff ff ff ff | 46 fd ff ff fe 88 fb 1e |es......|F.......|
|00000300| 00 00 00 00 ff ff ff ff | 18 03 00 80 82 4f 72 62 |........|.....Orb|
|00000310| 69 74 00 00 00 00 00 00 | 10 c4 00 00 41 f9 ff ff |it......|....A...|
|00000320| 19 de 7d 8d 03 00 67 1e | 10 c4 00 00 d7 8b 00 00 |..}...g.|........|
|00000330| 82 53 70 72 69 74 65 46 | 69 6c 65 00 b8 80 00 00 |.SpriteF|ile.....|
|00000340| 41 f9 ff ff b1 1d ff 8c | 03 00 87 3c b8 80 00 00 |A.......|...<....|
|00000350| 0b 50 01 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.P......|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 64 02 00 00 | 00 00 45 53 00 46 47 00 |....d...|..ES.FG.|
|00000380| fd fd fd fd fd fd fd d3 | fd fd fd fd fd fd 00 00 |........|........|
|00000390| d3 fd fd d3 fd fd fd fd | 09 94 db d1 00 00 00 00 |........|........|
|000003a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 64 02 00 00 |........|....d...|
|000003c0| 46 69 6c 65 44 61 74 61 | 82 21 42 6f 6f 74 00 00 |FileData|.!Boot..|
|000003d0| fd fd fd fd 3a 00 00 00 | 41 eb ff ff f3 ad fc 8c |....:...|A.......|
|000003e0| 03 00 b7 9e 53 65 74 20 | 53 79 73 46 58 24 44 69 |....Set |SysFX$Di|
|000003f0| 72 20 3c 4f 62 65 79 24 | 44 69 72 3e 0a 49 63 6f |r <Obey$|Dir>.Ico|
|00000400| 6e 53 70 72 69 74 65 73 | 20 3c 4f 62 65 79 24 44 |nSprites| <Obey$D|
|00000410| 69 72 3e 2e 21 53 70 72 | 69 74 65 73 0a 0a 46 69 |ir>.!Spr|ites..Fi|
|00000420| 6c 65 44 61 74 61 82 21 | 52 75 6e 00 47 00 fd fd |leData.!|Run.G...|
|00000430| fd fd 5a 00 00 00 41 eb | ff ff 13 06 11 8f 03 00 |..Z...A.|........|
|00000440| c0 84 53 65 74 20 53 79 | 73 46 58 24 44 69 72 20 |..Set Sy|sFX$Dir |
|00000450| 3c 4f 62 65 79 24 44 69 | 72 3e 0a 57 69 6d 70 73 |<Obey$Di|r>.Wimps|
|00000460| 6c 6f 74 20 2d 6d 69 6e | 20 31 36 30 4b 20 2d 6d |lot -min| 160K -m|
|00000470| 61 78 20 31 36 30 4b 0a | 52 75 6e 20 3c 53 79 73 |ax 160K.|Run <Sys|
|00000480| 46 58 24 44 69 72 3e 2e | 42 61 73 69 63 50 72 6f |FX$Dir>.|BasicPro|
|00000490| 67 73 2e 53 79 73 46 58 | 30 35 31 0a 46 69 6c 65 |gs.SysFX|051.File|
|000004a0| 44 61 74 61 82 21 53 70 | 72 69 74 65 73 00 fd fd |Data.!Sp|rites...|
|000004b0| d8 03 00 00 41 f9 ff ff | f5 a6 fe 8c 03 00 13 39 |....A...|.......9|
|000004c0| 01 00 00 00 10 00 00 00 | dc 03 00 00 cc 03 00 00 |........|........|
|000004d0| 21 73 79 73 66 78 00 00 | 00 00 00 00 04 00 00 00 |!sysfx..|........|
|000004e0| 13 00 00 00 00 00 00 00 | 17 00 00 00 ac 00 00 00 |........|........|
|000004f0| 3c 02 00 00 0c 00 00 00 | 00 ff ff ff 00 ff ff ff |<.......|........|
|00000500| 01 dd dd dd 01 dd dd dd | 02 bb bb bb 02 bb bb bb |........|........|
|00000510| 03 99 99 99 03 99 99 99 | 04 77 77 77 04 77 77 77 |........|.www.www|
|00000520| 05 55 55 55 05 55 55 55 | 06 33 33 33 06 33 33 33 |.UUU.UUU|.333.333|
|00000530| 07 00 00 00 07 00 00 00 | 08 00 44 99 08 00 44 99 |........|..D...D.|
|00000540| 09 ee ee 00 09 ee ee 00 | 0a 00 cc 00 0a 00 cc 00 |........|........|
|00000550| 0b dd 00 00 0b dd 00 00 | 0c ee ee bb 0c ee ee bb |........|........|
|00000560| 0d 55 88 00 0d 55 88 00 | 0e ff bb 00 0e ff bb 00 |.U...U..|........|
|00000570| 0f 00 bb ff 0f 00 bb ff | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 f0 00 |........|........|
|000005e0| 00 00 00 80 88 88 88 88 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 ff 0f ff ff ff 88 88 | 88 88 88 88 88 08 00 00 |........|........|
|00000600| 00 00 00 00 00 f0 ff 00 | 00 80 88 88 88 88 88 88 |........|........|
|00000610| 88 88 00 00 00 00 00 00 | 00 00 00 ff 0f 88 88 88 |........|........|
|00000620| 88 88 88 88 88 88 08 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| f0 ff 8f 88 88 88 88 88 | 88 88 f8 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 88 f8 ff | 8f 88 88 88 88 88 08 ff |........|........|
|00000650| 0f 00 00 00 00 00 00 00 | 00 80 88 88 f8 ff ff 8f |........|........|
|00000660| 88 88 00 00 f0 ff 00 00 | 00 00 00 00 00 00 88 88 |........|........|
|00000670| 88 88 88 f8 ff ff ff ff | 0f ff 0f 00 00 00 00 00 |........|........|
|00000680| 00 00 00 88 88 88 88 88 | 08 00 00 00 f0 00 00 00 |........|........|
|00000690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000710| 00 00 00 00 00 00 00 00 | 00 00 00 ff 00 00 00 00 |........|........|
|00000720| 00 00 00 00 00 00 00 00 | 00 0f 00 00 00 00 00 ff |........|........|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 f0 0f 00 00 |........|........|
|00000740| 00 00 00 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| ff 00 00 00 00 00 00 ff | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 f0 0f 00 00 00 | 00 00 00 ff 00 00 f0 00 |........|........|
|00000770| 00 00 00 f0 ff ff ff ff | 00 00 00 00 00 00 00 ff |........|........|
|00000780| 00 ff 0f ff ff ff ff ff | ff ff ff ff ff 0f 00 00 |........|........|
|00000790| 00 00 00 ff 00 f0 ff 00 | 00 f0 ff ff ff ff ff ff |........|........|
|000007a0| ff ff 00 00 00 00 00 ff | 00 00 00 ff 0f ff ff ff |........|........|
|000007b0| ff ff ff ff ff ff 0f 00 | 00 00 00 ff 00 00 00 00 |........|........|
|000007c0| f0 ff ff ff ff ff ff ff | ff ff ff 00 00 00 00 ff |........|........|
|000007d0| 00 00 00 00 00 ff ff ff | ff ff ff ff ff ff 0f ff |........|........|
|000007e0| 0f 00 00 ff 00 00 00 00 | 00 f0 ff ff ff ff ff ff |........|........|
|000007f0| ff ff 00 00 f0 ff 00 ff | 00 00 00 00 00 00 ff ff |........|........|
|00000800| ff ff ff ff ff ff ff ff | 0f ff 0f ff 00 00 00 00 |........|........|
|00000810| 00 00 00 ff ff ff ff ff | 0f 00 00 00 f0 00 00 ff |........|........|
|00000820| 00 00 00 00 00 00 00 ff | 00 00 00 00 00 00 00 00 |........|........|
|00000830| 00 00 00 ff 00 00 00 00 | 00 00 f0 0f 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 ff | 00 00 00 00 00 00 ff 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 ff 00 00 00 00 |........|........|
|00000860| 00 00 0f 00 00 00 00 00 | 00 00 00 00 00 00 00 ff |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000890| 00 00 00 00 00 00 00 ff | 46 69 6c 65 44 61 74 61 |........|FileData|
|000008a0| 82 50 61 72 61 6d 65 74 | 65 72 73 00 00 05 00 00 |.Paramet|ers.....|
|000008b0| 41 fb ff ff 0d ab ff 8c | 03 00 d7 a0 0d 00 64 29 |A.......|......d)|
|000008c0| f4 20 3e 20 3c 53 79 73 | 46 58 24 44 69 72 3e 2e |. > <Sys|FX$Dir>.|
|000008d0| 42 61 73 69 63 50 72 6f | 67 73 2e 50 61 72 61 6d |BasicPro|gs.Param|
|000008e0| 65 74 65 72 73 0d 00 6e | 1f f4 20 41 75 74 68 6f |eters..n|.. Autho|
|000008f0| 72 20 20 20 20 20 20 20 | 3a 20 47 20 4c 20 46 69 |r |: G L Fi|
|00000900| 74 74 6f 6e 0d 00 78 24 | f4 20 43 6f 70 79 72 69 |tton..x$|. Copyri|
|00000910| 67 68 74 20 20 20 20 3a | 20 41 42 41 43 55 53 20 |ght :| ABACUS |
|00000920| 54 52 41 49 4e 49 4e 47 | 0d 00 82 24 f4 20 56 65 |TRAINING|...$. Ve|
|00000930| 72 73 69 6f 6e 20 30 2e | 30 30 20 3a 20 32 30 74 |rsion 0.|00 : 20t|
|00000940| 68 20 4d 61 72 63 68 20 | 31 39 38 39 0d 00 8c 05 |h March |1989....|
|00000950| 3a 0d 00 96 1b f4 20 44 | 65 6d 6f 6e 73 74 72 61 |:..... D|emonstra|
|00000960| 74 65 73 20 47 6c 6f 62 | 61 6c 73 2c 0d 00 a0 23 |tes Glob|als,...#|
|00000970| f4 20 50 61 72 61 6d 65 | 74 65 72 73 20 26 20 4c |. Parame|ters & L|
|00000980| 6f 63 61 6c 20 56 61 72 | 69 61 62 6c 65 73 2e 0d |ocal Var|iables..|
|00000990| 00 aa 05 3a 0d 00 b4 16 | f4 20 50 72 65 43 6f 72 |...:....|. PreCor|
|000009a0| 65 20 53 65 63 74 69 6f | 6e 2e 0d 00 be 05 3a 0d |e Sectio|n.....:.|
|000009b0| 00 c8 18 f4 20 53 65 74 | 20 75 70 20 65 72 72 6f |.... Set| up erro|
|000009c0| 72 20 74 72 61 70 2e 0d | 00 d2 0e ee 20 85 20 f2 |r trap..|.... . .|
|000009d0| 65 72 72 6f 72 0d 00 dc | 05 3a 0d 00 e6 16 f4 20 |error...|.:..... |
|000009e0| 43 68 6f 6f 73 65 20 74 | 68 65 20 6d 6f 64 65 2e |Choose t|he mode.|
|000009f0| 0d 00 f0 08 eb 20 31 32 | 0d 00 fa 05 3a 0d 01 04 |..... 12|....:...|
|00000a00| 1f f4 20 44 65 63 6c 61 | 72 65 20 67 6c 6f 62 61 |.. Decla|re globa|
|00000a10| 6c 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 01 0e 0d |l variab|les.....|
|00000a20| 78 25 20 20 20 3d 20 20 | 33 0d 01 18 05 3a 0d 01 |x% = |3....:..|
|00000a30| 22 05 3a 0d 03 e8 13 f4 | 20 43 6f 72 65 20 53 65 |".:.....| Core Se|
|00000a40| 63 74 69 6f 6e 2e 0d 03 | f2 05 3a 0d 03 fc 2e f1 |ction...|..:.....|
|00000a50| 20 22 54 68 65 20 67 6c | 6f 62 61 6c 20 76 61 6c | "The gl|obal val|
|00000a60| 75 65 20 6f 66 20 78 25 | 20 73 74 61 72 74 73 20 |ue of x%| starts |
|00000a70| 61 73 20 3d 20 22 3b 78 | 25 0d 04 06 2c f1 20 22 |as = ";x|%...,. "|
|00000a80| 54 68 65 20 76 61 72 69 | 61 62 6c 65 20 79 25 20 |The vari|able y% |
|00000a90| 68 61 73 20 6e 6f 20 67 | 6c 6f 62 61 6c 20 76 61 |has no g|lobal va|
|00000aa0| 6c 75 65 2e 22 0d 04 10 | 30 f1 20 22 43 61 6c 6c |lue."...|0. "Call|
|00000ab0| 20 74 68 65 20 70 72 6f | 63 65 64 75 72 65 20 77 | the pro|cedure w|
|00000ac0| 69 74 68 20 78 25 20 61 | 73 20 70 61 72 61 6d 65 |ith x% a|s parame|
|00000ad0| 74 65 72 2e 22 0d 04 1a | 05 3a 0d 04 24 19 f4 20 |ter."...|.:..$.. |
|00000ae0| 43 61 6c 6c 20 74 68 65 | 20 70 72 6f 63 65 64 75 |Call the| procedu|
|00000af0| 72 65 2e 0d 04 2e 10 f2 | 64 69 73 70 6c 61 79 28 |re......|display(|
|00000b00| 78 25 29 0d 04 38 05 3a | 0d 04 42 23 f1 20 27 22 |x%)..8.:|..B#. '"|
|00000b10| 4e 6f 77 20 6f 75 74 73 | 69 64 65 20 74 68 65 20 |Now outs|ide the |
|00000b20| 70 72 6f 63 65 64 75 72 | 65 2e 22 0d 04 4c 2e f1 |procedur|e."..L..|
|00000b30| 20 22 54 68 65 20 67 6c | 6f 62 61 6c 20 76 61 6c | "The gl|obal val|
|00000b40| 75 65 20 6f 66 20 78 25 | 20 69 73 20 73 74 69 6c |ue of x%| is stil|
|00000b50| 6c 20 20 3d 20 22 3b 78 | 25 0d 04 56 2f f1 20 22 |l = ";x|%..V/. "|
|00000b60| 4e 6f 77 20 74 68 65 20 | 76 61 72 69 61 62 6c 65 |Now the |variable|
|00000b70| 20 79 25 20 68 61 73 20 | 61 20 67 6c 6f 62 61 6c | y% has |a global|
|00000b80| 20 76 61 6c 75 65 2e 22 | 0d 04 60 2e f1 20 22 54 | value."|..`.. "T|
|00000b90| 68 65 20 67 6c 6f 62 61 | 6c 20 76 61 6c 75 65 20 |he globa|l value |
|00000ba0| 6f 66 20 79 25 20 20 20 | 20 20 20 20 20 69 73 20 |of y% | is |
|00000bb0| 3d 20 22 3b 79 25 0d 04 | 6a 05 3a 0d 04 74 05 e0 |= ";y%..|j.:..t..|
|00000bc0| 0d 04 7e 05 3a 0d 27 10 | 0c dd 20 f2 65 72 72 6f |..~.:.'.|.. .erro|
|00000bd0| 72 0d 27 1a 17 f4 20 52 | 65 70 6f 72 74 73 20 61 |r.'... R|eports a|
|00000be0| 6e 20 65 72 72 6f 72 2e | 0d 27 24 05 3a 0d 27 2e |n error.|.'$.:.'.|
|00000bf0| 05 3a 0d 27 38 05 3a 0d | 27 42 05 f6 0d 27 4c 13 |.:.'8.:.|'B...'L.|
|00000c00| f1 20 22 20 61 74 20 6c | 69 6e 65 20 22 3b 9e 0d |. " at l|ine ";..|
|00000c10| 27 56 05 e0 0d 27 60 05 | 3a 0d 27 6a 05 3a 0d 27 |'V...'`.|:.'j.:.'|
|00000c20| 74 1a dd 20 f2 64 69 73 | 70 6c 61 79 28 70 61 72 |t.. .dis|play(par|
|00000c30| 61 6d 65 74 65 72 25 29 | 0d 27 7e 21 f4 20 41 20 |ameter%)|.'~!. A |
|00000c40| 73 65 6c 66 20 63 6f 6e | 74 61 69 6e 65 64 20 70 |self con|tained p|
|00000c50| 72 6f 63 65 64 75 72 65 | 2e 0d 27 88 0b ea 20 78 |rocedure|..'... x|
|00000c60| 25 2c 79 25 0d 27 92 05 | 3a 0d 27 9c 20 f4 20 49 |%,y%.'..|:.'. . I|
|00000c70| 6e 69 74 69 61 6c 69 73 | 65 20 6c 6f 63 61 6c 20 |nitialis|e local |
|00000c80| 76 61 72 69 61 62 6c 65 | 2e 0d 27 a6 0d 78 25 20 |variable|..'..x% |
|00000c90| 20 20 3d 20 20 37 0d 27 | b0 0d 79 25 20 20 20 3d | = 7.'|..y% =|
|00000ca0| 20 20 38 0d 27 ba 05 3a | 0d 27 c4 22 f1 20 27 22 | 8.'..:|.'.". '"|
|00000cb0| 4e 6f 77 20 69 6e 73 69 | 64 65 20 74 68 65 20 70 |Now insi|de the p|
|00000cc0| 72 6f 63 65 64 75 72 65 | 2e 22 0d 27 ce 24 f1 20 |rocedure|.".'.$. |
|00000cd0| 22 4c 6f 63 61 6c 20 76 | 61 72 69 61 62 6c 65 73 |"Local v|ariables|
|00000ce0| 20 61 72 65 20 78 25 20 | 26 20 79 25 2e 22 0d 27 | are x% |& y%.".'|
|00000cf0| d8 2e f1 20 22 54 68 65 | 20 6c 6f 63 61 6c 20 20 |... "The| local |
|00000d00| 76 61 6c 75 65 20 6f 66 | 20 78 25 20 20 20 20 20 |value of| x% |
|00000d10| 20 20 20 69 73 20 3d 20 | 22 3b 78 25 0d 27 e2 2e | is = |";x%.'..|
|00000d20| f1 20 22 54 68 65 20 6c | 6f 63 61 6c 20 20 76 61 |. "The l|ocal va|
|00000d30| 6c 75 65 20 6f 66 20 79 | 25 20 20 20 20 20 20 20 |lue of y|% |
|00000d40| 20 69 73 20 3d 20 22 3b | 79 25 0d 27 ec 36 f1 20 | is = ";|y%.'.6. |
|00000d50| 22 54 68 65 20 76 61 6c | 75 65 20 6f 66 20 74 68 |"The val|ue of th|
|00000d60| 65 20 70 61 72 61 6d 65 | 74 65 72 20 20 20 20 69 |e parame|ter i|
|00000d70| 73 20 3d 20 22 3b 70 61 | 72 61 6d 65 74 65 72 25 |s = ";pa|rameter%|
|00000d80| 0d 27 f6 05 3a 0d 28 00 | 1c f1 20 22 4c 65 61 76 |.'..:.(.|.. "Leav|
|00000d90| 65 20 74 68 65 20 70 72 | 6f 63 65 64 75 72 65 2e |e the pr|ocedure.|
|00000da0| 22 0d 28 0a 05 3a 0d 28 | 14 05 e1 0d 28 1e 05 3a |".(..:.(|....(..:|
|00000db0| 0d 28 28 05 3a 0d 28 32 | 05 3a 0d ff 46 69 6c 65 |.((.:.(2|.:..File|
|00000dc0| 44 61 74 61 82 53 79 73 | 46 58 30 30 30 00 00 00 |Data.Sys|FX000...|
|00000dd0| 82 0c 00 00 41 fb ff ff | 7c 2f 09 8d 03 00 0c 94 |....A...||/......|
|00000de0| 0d 00 64 27 f4 20 3e 20 | 3c 53 79 73 46 58 24 44 |..d'. > |<SysFX$D|
|00000df0| 69 72 3e 2e 42 61 73 69 | 63 50 72 6f 67 73 2e 53 |ir>.Basi|cProgs.S|
|00000e00| 79 73 46 58 30 30 30 0d | 00 6e 1f f4 20 41 75 74 |ysFX000.|.n.. Aut|
|00000e10| 68 6f 72 20 20 20 20 20 | 20 20 3a 20 47 20 4c 20 |hor | : G L |
|00000e20| 46 69 74 74 6f 6e 0d 00 | 78 24 f4 20 43 6f 70 79 |Fitton..|x$. Copy|
|00000e30| 72 69 67 68 74 20 20 20 | 20 3a 20 41 42 41 43 55 |right | : ABACU|
|00000e40| 53 20 54 52 41 49 4e 49 | 4e 47 0d 00 82 24 f4 20 |S TRAINI|NG...$. |
|00000e50| 56 65 72 73 69 6f 6e 20 | 30 2e 30 30 20 3a 20 32 |Version |0.00 : 2|
|00000e60| 30 74 68 20 4d 61 72 63 | 68 20 31 39 38 39 0d 00 |0th Marc|h 1989..|
|00000e70| 8c 05 3a 0d 00 96 27 f4 | 20 43 72 65 61 74 65 20 |..:...'.| Create |
|00000e80| 61 20 21 53 70 72 69 74 | 65 20 69 63 6f 6e 20 66 |a !Sprit|e icon f|
|00000e90| 6f 72 20 21 53 79 73 46 | 58 2e 0d 00 a0 05 3a 0d |or !SysF|X.....:.|
|00000ea0| 00 aa 16 f4 20 50 72 65 | 43 6f 72 65 20 53 65 63 |.... Pre|Core Sec|
|00000eb0| 74 69 6f 6e 2e 0d 00 b4 | 18 f4 20 53 65 74 20 75 |tion....|.. Set u|
|00000ec0| 70 20 65 72 72 6f 72 20 | 74 72 61 70 2e 0d 00 be |p error |trap....|
|00000ed0| 0e ee 20 85 20 f2 65 72 | 72 6f 72 0d 00 c8 05 3a |.. . .er|ror....:|
|00000ee0| 0d 00 d2 16 f4 20 43 68 | 6f 6f 73 65 20 74 68 65 |..... Ch|oose the|
|00000ef0| 20 6d 6f 64 65 2e 0d 00 | dc 08 eb 20 31 32 0d 00 | mode...|... 12..|
|00000f00| e6 05 3a 0d 00 f0 1f f4 | 20 44 65 63 6c 61 72 65 |..:.....| Declare|
|00000f10| 20 67 6c 6f 62 61 6c 20 | 76 61 72 69 61 62 6c 65 | global |variable|
|00000f20| 73 2e 0d 00 fa 16 78 63 | 65 6e 74 72 65 25 20 20 |s.....xc|entre% |
|00000f30| 20 20 3d 20 20 36 34 30 | 0d 01 04 16 79 63 65 6e | = 640|....ycen|
|00000f40| 74 72 65 25 20 20 20 20 | 3d 20 20 35 31 32 0d 01 |tre% |= 512..|
|00000f50| 0e 18 61 6e 67 6c 65 20 | 20 20 20 20 20 20 3d 20 |..angle | = |
|00000f60| 20 33 2a af 2f 38 0d 01 | 18 15 73 73 69 7a 65 25 | 3*./8..|..ssize%|
|00000f70| 20 20 20 20 20 20 3d 20 | 20 37 36 0d 01 22 05 3a | = | 76..".:|
|00000f80| 0d 01 2c 21 f4 20 52 65 | 73 65 72 76 65 20 61 20 |..,!. Re|serve a |
|00000f90| 75 73 65 72 20 73 70 72 | 69 74 65 20 61 72 65 61 |user spr|ite area|
|00000fa0| 2e 0d 01 36 13 de 20 73 | 75 73 65 72 25 20 26 31 |...6.. s|user% &1|
|00000fb0| 30 30 30 30 0d 01 40 10 | de 20 73 6e 61 6d 65 25 |0000..@.|. sname%|
|00000fc0| 20 26 32 30 0d 01 4a 10 | de 20 66 6e 61 6d 65 25 | &20..J.|. fname%|
|00000fd0| 20 26 32 30 0d 01 54 05 | 3a 0d 01 5e 05 3a 0d 01 | &20..T.|:..^.:..|
|00000fe0| 68 1f f4 20 53 65 74 20 | 75 70 20 74 68 65 20 63 |h.. Set |up the c|
|00000ff0| 6f 6e 74 72 6f 6c 20 62 | 6c 6f 63 6b 2e 0d 01 72 |ontrol b|lock...r|
|00001000| 18 73 75 73 65 72 25 21 | 26 30 20 20 20 3d 20 26 |.suser%!|&0 = &|
|00001010| 31 30 30 30 30 0d 01 7c | 15 73 75 73 65 72 25 21 |10000..||.suser%!|
|00001020| 26 34 20 20 20 3d 20 26 | 30 30 0d 01 86 15 73 75 |&4 = &|00....su|
|00001030| 73 65 72 25 21 26 38 20 | 20 20 3d 20 26 31 30 0d |ser%!&8 | = &10.|
|00001040| 01 90 15 73 75 73 65 72 | 25 21 26 43 20 20 20 3d |...suser|%!&C =|
|00001050| 20 26 31 30 0d 01 9a 05 | 3a 0d 01 a4 1a 24 73 6e | &10....|:....$sn|
|00001060| 61 6d 65 25 20 20 20 20 | 20 3d 20 22 21 53 79 73 |ame% | = "!Sys|
|00001070| 46 58 22 0d 01 ae 28 24 | 66 6e 61 6d 65 25 20 20 |FX"...($|fname% |
|00001080| 20 20 20 3d 20 22 3c 53 | 79 73 46 58 24 44 69 72 | = "<S|ysFX$Dir|
|00001090| 3e 2e 21 53 70 72 69 74 | 65 73 22 0d 01 b8 05 3a |>.!Sprit|es"....:|
|000010a0| 0d 01 c2 05 3a 0d 03 e8 | 13 f4 20 43 6f 72 65 20 |....:...|.. Core |
|000010b0| 53 65 63 74 69 6f 6e 2e | 0d 03 f2 05 3a 0d 03 fc |Section.|....:...|
|000010c0| 05 3a 0d 04 06 40 f2 64 | 72 61 77 67 6c 6f 62 65 |.:...@.d|rawglobe|
|000010d0| 28 78 63 65 6e 74 72 65 | 25 2d 73 73 69 7a 65 25 |(xcentre|%-ssize%|
|000010e0| 2f 32 2c 79 63 65 6e 74 | 72 65 25 2d 73 73 69 7a |/2,ycent|re%-ssiz|
|000010f0| 65 25 2f 32 2c 61 6e 67 | 6c 65 2c 73 73 69 7a 65 |e%/2,ang|le,ssize|
|00001100| 25 29 0d 04 10 48 f2 67 | 65 74 73 70 72 69 74 65 |%)...H.g|etsprite|
|00001110| 28 73 75 73 65 72 25 2c | 73 6e 61 6d 65 25 2c 78 |(suser%,|sname%,x|
|00001120| 63 65 6e 74 72 65 25 2d | 73 73 69 7a 65 25 2f 32 |centre%-|ssize%/2|
|00001130| 2c 79 63 65 6e 74 72 65 | 25 2d 73 73 69 7a 65 25 |,ycentre|%-ssize%|
|00001140| 2f 32 2c 73 73 69 7a 65 | 25 29 0d 04 1a 1e f2 73 |/2,ssize|%).....s|
|00001150| 61 76 65 73 70 72 69 74 | 65 28 73 75 73 65 72 25 |avesprit|e(suser%|
|00001160| 2c 66 6e 61 6d 65 25 29 | 0d 04 24 05 3a 0d 04 2e |,fname%)|..$.:...|
|00001170| 05 3a 0d 04 38 05 3a 0d | 04 42 05 3a 0d 04 4c 05 |.:..8.:.|.B.:..L.|
|00001180| e0 0d 04 56 05 3a 0d 04 | 60 05 3a 0d 27 10 0c dd |...V.:..|`.:.'...|
|00001190| 20 f2 65 72 72 6f 72 0d | 27 1a 17 f4 20 52 65 70 | .error.|'... Rep|
|000011a0| 6f 72 74 73 20 61 6e 20 | 65 72 72 6f 72 2e 0d 27 |orts an |error..'|
|000011b0| 24 05 3a 0d 27 2e 05 3a | 0d 27 38 05 3a 0d 27 42 |$.:.'..:|.'8.:.'B|
|000011c0| 05 f6 0d 27 4c 13 f1 20 | 22 20 61 74 20 6c 69 6e |...'L.. |" at lin|
|000011d0| 65 20 22 3b 9e 0d 27 56 | 05 e0 0d 27 60 05 3a 0d |e ";..'V|...'`.:.|
|000011e0| 27 6a 05 3a 0d 27 74 2c | dd 20 f2 64 72 61 77 67 |'j.:.'t,|. .drawg|
|000011f0| 6c 6f 62 65 28 6c 65 66 | 74 25 2c 62 6f 74 74 6f |lobe(lef|t%,botto|
|00001200| 6d 25 2c 61 6e 67 6c 65 | 31 2c 73 69 7a 65 25 29 |m%,angle|1,size%)|
|00001210| 0d 27 7e 2b f4 20 44 72 | 61 77 73 20 61 20 67 6c |.'~+. Dr|aws a gl|
|00001220| 6f 62 65 20 74 6f 20 62 | 65 20 75 73 65 64 20 61 |obe to b|e used a|
|00001230| 73 20 61 20 73 70 72 69 | 74 65 2e 0d 27 88 19 ea |s a spri|te..'...|
|00001240| 20 78 63 25 2c 79 63 25 | 2c 72 61 64 25 2c 61 6e | xc%,yc%|,rad%,an|
|00001250| 67 6c 65 32 0d 27 92 05 | 3a 0d 27 9c 1b f4 20 49 |gle2.'..|:.'... I|
|00001260| 6e 69 74 69 61 6c 69 73 | 65 20 76 61 72 69 61 62 |nitialis|e variab|
|00001270| 6c 65 73 2e 0d 27 a6 05 | 3a 0d 27 b0 05 3a 0d 27 |les..'..|:.'..:.'|
|00001280| ba 05 3a 0d 27 c4 1d 78 | 63 25 20 20 20 20 20 3d |..:.'..x|c% =|
|00001290| 20 6c 65 66 74 25 20 20 | 2b 73 69 7a 65 25 2f 32 | left% |+size%/2|
|000012a0| 0d 27 ce 1d 79 63 25 20 | 20 20 20 20 3d 20 62 6f |.'..yc% | = bo|
|000012b0| 74 74 6f 6d 25 2b 73 69 | 7a 65 25 2f 32 0d 27 d8 |ttom%+si|ze%/2.'.|
|000012c0| 15 72 61 64 25 20 20 20 | 20 3d 20 73 69 7a 65 25 |.rad% | = size%|
|000012d0| 2f 34 0d 27 e2 05 3a 0d | 27 ec 18 61 6e 67 6c 65 |/4.'..:.|'..angle|
|000012e0| 32 20 20 3d 20 61 6e 67 | 6c 65 31 2d af 2f 32 0d |2 = ang|le1-./2.|
|000012f0| 27 f6 05 3a 0d 28 00 16 | f4 20 44 72 61 77 20 67 |'..:.(..|. Draw g|
|00001300| 6c 6f 62 65 20 61 78 69 | 73 2e 0d 28 0a 07 e6 20 |lobe axi|s..(... |
|00001310| 37 0d 28 14 29 c8 9d 20 | c8 90 20 78 63 25 2c 79 |7.(.).. |.. xc%,y|
|00001320| 63 25 2c 73 69 7a 65 25 | 2f 32 2c 73 69 7a 65 25 |c%,size%|/2,size%|
|00001330| 2f 36 34 2c 61 6e 67 6c | 65 31 0d 28 1e 05 3a 0d |/64,angl|e1.(..:.|
|00001340| 28 28 1d f4 20 44 72 61 | 77 20 67 6c 6f 62 65 20 |((.. Dra|w globe |
|00001350| 62 6f 74 74 6f 6d 20 68 | 61 6c 66 2e 0d 28 32 07 |bottom h|alf..(2.|
|00001360| e6 20 34 0d 28 3c 0d ec | 20 78 63 25 2c 79 63 25 |. 4.(<..| xc%,yc%|
|00001370| 0d 28 46 2f ec 20 20 20 | 20 20 78 63 25 2d 72 61 |.(F/. | xc%-ra|
|00001380| 64 25 2a 9b 28 61 6e 67 | 6c 65 32 29 2c 79 63 25 |d%*.(ang|le2),yc%|
|00001390| 2d 72 61 64 25 2a b5 28 | 61 6e 67 6c 65 32 29 0d |-rad%*.(|angle2).|
|000013a0| 28 50 2f f0 20 26 42 35 | 2c 78 63 25 2b 72 61 64 |(P/. &B5|,xc%+rad|
|000013b0| 25 2a 9b 28 61 6e 67 6c | 65 32 29 2c 79 63 25 2b |%*.(angl|e2),yc%+|
|000013c0| 72 61 64 25 2a b5 28 61 | 6e 67 6c 65 32 29 0d 28 |rad%*.(a|ngle2).(|
|000013d0| 5a 05 3a 0d 28 64 1b f4 | 20 44 72 61 77 20 73 61 |Z.:.(d..| Draw sa|
|000013e0| 74 65 6c 6c 69 74 65 20 | 6f 72 62 69 74 2e 0d 28 |tellite |orbit..(|
|000013f0| 6e 07 e6 20 36 0d 28 78 | 25 c8 9d 20 78 63 25 2c |n.. 6.(x|%.. xc%,|
|00001400| 79 63 25 2c 73 69 7a 65 | 25 2f 38 2c 73 69 7a 65 |yc%,size|%/8,size|
|00001410| 25 2f 32 2c 61 6e 67 6c | 65 31 0d 28 82 05 3a 0d |%/2,angl|e1.(..:.|
|00001420| 28 8c 1a f4 20 44 72 61 | 77 20 67 6c 6f 62 65 20 |(... Dra|w globe |
|00001430| 74 6f 70 20 68 61 6c 66 | 2e 0d 28 96 07 e6 20 34 |top half|..(... 4|
|00001440| 0d 28 a0 0d ec 20 78 63 | 25 2c 79 63 25 0d 28 aa |.(... xc|%,yc%.(.|
|00001450| 2f ec 20 20 20 20 20 78 | 63 25 2b 72 61 64 25 2a |/. x|c%+rad%*|
|00001460| 9b 28 61 6e 67 6c 65 32 | 29 2c 79 63 25 2b 72 61 |.(angle2|),yc%+ra|
|00001470| 64 25 2a b5 28 61 6e 67 | 6c 65 32 29 0d 28 b4 2f |d%*.(ang|le2).(./|
|00001480| f0 20 26 42 35 2c 78 63 | 25 2d 72 61 64 25 2a 9b |. &B5,xc|%-rad%*.|
|00001490| 28 61 6e 67 6c 65 32 29 | 2c 79 63 25 2d 72 61 64 |(angle2)|,yc%-rad|
|000014a0| 25 2a b5 28 61 6e 67 6c | 65 32 29 0d 28 be 05 3a |%*.(angl|e2).(..:|
|000014b0| 0d 28 c8 05 3a 0d 28 d2 | 05 3a 0d 28 dc 05 3a 0d |.(..:.(.|.:.(..:.|
|000014c0| 28 e6 05 3a 0d 28 f0 05 | e1 0d 28 fa 05 3a 0d 29 |(..:.(..|..(..:.)|
|000014d0| 04 31 dd 20 f2 67 65 74 | 73 70 72 69 74 65 28 75 |.1. .get|sprite(u|
|000014e0| 73 65 72 25 2c 6e 61 6d | 65 25 2c 6c 65 66 74 25 |ser%,nam|e%,left%|
|000014f0| 2c 62 6f 74 74 6f 6d 25 | 2c 73 69 7a 65 25 29 0d |,bottom%|,size%).|
|00001500| 29 0e 28 f4 20 50 69 63 | 6b 20 20 75 70 20 61 20 |).(. Pic|k up a |
|00001510| 73 70 72 69 74 65 20 66 | 72 6f 6d 20 74 68 65 20 |sprite f|rom the |
|00001520| 73 63 72 65 65 6e 2e 0d | 29 18 26 f4 20 53 61 76 |screen..|).&. Sav|
|00001530| 65 20 69 74 20 69 6e 20 | 74 68 65 20 75 73 65 72 |e it in |the user|
|00001540| 20 73 70 72 69 74 65 20 | 61 72 65 61 2e 0d 29 22 | sprite |area..)"|
|00001550| 1f ea 20 72 69 67 68 74 | 25 2c 74 6f 70 25 2c 67 |.. right|%,top%,g|
|00001560| 65 74 25 2c 70 61 6c 65 | 74 74 65 25 0d 29 2c 05 |et%,pale|tte%.),.|
|00001570| 3a 0d 29 36 1b f4 20 49 | 6e 69 74 69 61 6c 69 73 |:.)6.. I|nitialis|
|00001580| 65 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 29 40 15 |e variab|les..)@.|
|00001590| 67 65 74 25 20 20 20 20 | 20 3d 20 31 36 2b 32 35 |get% | = 16+25|
|000015a0| 36 0d 29 4a 10 70 61 6c | 65 74 74 65 25 20 3d 20 |6.)J.pal|ette% = |
|000015b0| 31 0d 29 54 05 3a 0d 29 | 5e 1e 72 69 67 68 74 25 |1.)T.:.)|^.right%|
|000015c0| 20 20 20 3d 20 6c 65 66 | 74 25 20 20 2b 73 69 7a | = lef|t% +siz|
|000015d0| 65 25 2d 31 0d 29 68 1e | 74 6f 70 25 20 20 20 20 |e%-1.)h.|top% |
|000015e0| 20 3d 20 62 6f 74 74 6f | 6d 25 2b 73 69 7a 65 25 | = botto|m%+size%|
|000015f0| 2d 31 0d 29 72 05 3a 0d | 29 7c 05 3a 0d 29 86 05 |-1.)r.:.|)|.:.)..|
|00001600| 3a 0d 29 90 05 3a 0d 29 | 9a 05 3a 0d 29 a4 48 c8 |:.)..:.)|..:.).H.|
|00001610| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00001620| 67 65 74 25 2c 75 73 65 | 72 25 2c 6e 61 6d 65 25 |get%,use|r%,name%|
|00001630| 2c 70 61 6c 65 74 74 65 | 25 2c 6c 65 66 74 25 2c |,palette|%,left%,|
|00001640| 62 6f 74 74 6f 6d 25 2c | 72 69 67 68 74 25 2c 74 |bottom%,|right%,t|
|00001650| 6f 70 25 0d 29 ae 05 3a | 0d 29 b8 05 e1 0d 29 c2 |op%.)..:|.)....).|
|00001660| 05 3a 0d 29 cc 1e dd 20 | f2 73 61 76 65 73 70 72 |.:.)... |.savespr|
|00001670| 69 74 65 28 75 73 65 72 | 25 2c 6e 61 6d 65 25 29 |ite(user|%,name%)|
|00001680| 0d 29 d6 29 f4 20 53 61 | 76 65 73 20 74 68 65 20 |.).). Sa|ves the |
|00001690| 75 73 65 72 20 73 70 72 | 69 74 65 20 61 72 65 61 |user spr|ite area|
|000016a0| 20 74 6f 20 64 69 73 63 | 2e 0d 29 e0 0b ea 20 73 | to disc|..)... s|
|000016b0| 61 76 65 25 0d 29 ea 1b | f4 20 49 6e 69 74 69 61 |ave%.)..|. Initia|
|000016c0| 6c 69 73 65 20 76 61 72 | 69 61 62 6c 65 73 2e 0d |lise var|iables..|
|000016d0| 29 f4 16 73 61 76 65 25 | 20 20 20 20 3d 20 20 31 |)..save%| = 1|
|000016e0| 32 2b 32 35 36 0d 29 fe | 05 3a 0d 2a 08 26 c8 99 |2+256.).|.:.*.&..|
|000016f0| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 73 | "OS_Spr|iteOp",s|
|00001700| 61 76 65 25 2c 75 73 65 | 72 25 2c 6e 61 6d 65 25 |ave%,use|r%,name%|
|00001710| 0d 2a 12 05 3a 0d 2a 1c | 05 e1 0d 2a 26 05 3a 0d |.*..:.*.|...*&.:.|
|00001720| 2a 30 1e dd 20 f2 6c 6f | 61 64 73 70 72 69 74 65 |*0.. .lo|adsprite|
|00001730| 28 75 73 65 72 25 2c 6e | 61 6d 65 25 29 0d 2a 3a |(user%,n|ame%).*:|
|00001740| 24 f4 20 4c 6f 61 64 73 | 20 61 20 73 70 72 69 74 |$. Loads| a sprit|
|00001750| 65 20 66 69 6c 65 20 66 | 72 6f 6d 20 64 69 73 63 |e file f|rom disc|
|00001760| 2e 0d 2a 44 0b ea 20 6c | 6f 61 64 25 0d 2a 4e 1b |..*D.. l|oad%.*N.|
|00001770| f4 20 49 6e 69 74 69 61 | 6c 69 73 65 20 76 61 72 |. Initia|lise var|
|00001780| 69 61 62 6c 65 73 2e 0d | 2a 58 16 6c 6f 61 64 25 |iables..|*X.load%|
|00001790| 20 20 20 20 3d 20 20 31 | 30 2b 32 35 36 0d 2a 62 | = 1|0+256.*b|
|000017a0| 05 3a 0d 2a 6c 26 c8 99 | 20 22 4f 53 5f 53 70 72 |.:.*l&..| "OS_Spr|
|000017b0| 69 74 65 4f 70 22 2c 6c | 6f 61 64 25 2c 75 73 65 |iteOp",l|oad%,use|
|000017c0| 72 25 2c 6e 61 6d 65 25 | 0d 2a 76 05 3a 0d 2a 80 |r%,name%|.*v.:.*.|
|000017d0| 05 e1 0d 2a 8a 05 3a 0d | 2a 94 32 dd 20 f2 70 6c |...*..:.|*.2. .pl|
|000017e0| 6f 74 73 70 72 69 74 65 | 28 75 73 65 72 25 2c 6e |otsprite|(user%,n|
|000017f0| 61 6d 65 25 2c 6c 65 66 | 74 25 2c 62 6f 74 74 6f |ame%,lef|t%,botto|
|00001800| 6d 25 2c 73 74 65 70 25 | 29 0d 2a 9e 22 f4 20 50 |m%,step%|).*.". P|
|00001810| 6c 6f 74 73 20 61 20 73 | 70 72 69 74 65 20 74 6f |lots a s|prite to|
|00001820| 20 74 68 65 20 73 63 72 | 65 65 6e 0d 2a a8 21 f4 | the scr|een.*.!.|
|00001830| 20 20 66 72 6f 6d 20 74 | 68 65 20 75 73 65 72 20 | from t|he user |
|00001840| 73 70 72 69 74 65 20 61 | 72 65 61 2e 0d 2a b2 22 |sprite a|rea..*."|
|00001850| ea 20 63 68 6f 6f 73 65 | 25 2c 70 6c 6f 74 25 2c |. choose|%,plot%,|
|00001860| 67 63 6f 6c 25 2c 70 6f | 69 6e 74 65 72 25 0d 2a |gcol%,po|inter%.*|
|00001870| bc 05 3a 0d 2a c6 1b f4 | 20 49 6e 69 74 69 61 6c |..:.*...| Initial|
|00001880| 69 73 65 20 76 61 72 69 | 61 62 6c 65 73 2e 0d 2a |ise vari|ables..*|
|00001890| d0 16 63 68 6f 6f 73 65 | 25 20 20 3d 20 20 32 34 |..choose|% = 24|
|000018a0| 2b 32 35 36 0d 2a da 16 | 70 6c 6f 74 25 20 20 20 |+256.*..|plot% |
|000018b0| 20 3d 20 20 33 34 2b 35 | 31 32 0d 2a e4 12 67 63 | = 34+5|12.*..gc|
|000018c0| 6f 6c 25 20 20 20 20 3d | 20 20 20 38 0d 2a ee 05 |ol% =| 8.*..|
|000018d0| 3a 0d 2a f8 1e f4 20 46 | 69 6e 64 20 74 68 65 20 |:.*... F|ind the |
|000018e0| 73 70 72 69 74 65 20 70 | 6f 69 6e 74 65 72 2e 0d |sprite p|ointer..|
|000018f0| 2b 02 35 c8 99 20 22 4f | 53 5f 53 70 72 69 74 65 |+.5.. "O|S_Sprite|
|00001900| 4f 70 22 2c 63 68 6f 6f | 73 65 25 2c 75 73 65 72 |Op",choo|se%,user|
|00001910| 25 2c 6e 61 6d 65 25 20 | b8 20 2c 2c 70 6f 69 6e |%,name% |. ,,poin|
|00001920| 74 65 72 25 0d 2b 0c 05 | 3a 0d 2b 16 21 f4 20 50 |ter%.+..|:.+.!. P|
|00001930| 6c 6f 74 20 74 68 65 20 | 73 70 72 69 74 65 20 66 |lot the |sprite f|
|00001940| 6f 75 72 20 74 69 6d 65 | 73 2e 0d 2b 20 3d c8 99 |our time|s..+ =..|
|00001950| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 70 | "OS_Spr|iteOp",p|
|00001960| 6c 6f 74 25 2c 75 73 65 | 72 25 2c 70 6f 69 6e 74 |lot%,use|r%,point|
|00001970| 65 72 25 2c 6c 65 66 74 | 25 2c 62 6f 74 74 6f 6d |er%,left|%,bottom|
|00001980| 25 2c 67 63 6f 6c 25 0d | 2b 2a 43 c8 99 20 22 4f |%,gcol%.|+*C.. "O|
|00001990| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 70 6c 6f 74 |S_Sprite|Op",plot|
|000019a0| 25 2c 75 73 65 72 25 2c | 70 6f 69 6e 74 65 72 25 |%,user%,|pointer%|
|000019b0| 2c 6c 65 66 74 25 2b 73 | 74 65 70 25 2c 62 6f 74 |,left%+s|tep%,bot|
|000019c0| 74 6f 6d 25 2c 67 63 6f | 6c 25 0d 2b 34 49 c8 99 |tom%,gco|l%.+4I..|
|000019d0| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 70 | "OS_Spr|iteOp",p|
|000019e0| 6c 6f 74 25 2c 75 73 65 | 72 25 2c 70 6f 69 6e 74 |lot%,use|r%,point|
|000019f0| 65 72 25 2c 6c 65 66 74 | 25 2b 73 74 65 70 25 2c |er%,left|%+step%,|
|00001a00| 62 6f 74 74 6f 6d 25 2b | 73 74 65 70 25 2c 67 63 |bottom%+|step%,gc|
|00001a10| 6f 6c 25 0d 2b 3e 43 c8 | 99 20 22 4f 53 5f 53 70 |ol%.+>C.|. "OS_Sp|
|00001a20| 72 69 74 65 4f 70 22 2c | 70 6c 6f 74 25 2c 75 73 |riteOp",|plot%,us|
|00001a30| 65 72 25 2c 70 6f 69 6e | 74 65 72 25 2c 6c 65 66 |er%,poin|ter%,lef|
|00001a40| 74 25 2c 62 6f 74 74 6f | 6d 25 2b 73 74 65 70 25 |t%,botto|m%+step%|
|00001a50| 2c 67 63 6f 6c 25 0d 2b | 48 05 3a 0d 2b 52 05 e1 |,gcol%.+|H.:.+R..|
|00001a60| 0d ff 46 69 6c 65 44 61 | 74 61 82 53 79 73 46 58 |..FileDa|ta.SysFX|
|00001a70| 30 31 30 00 00 00 b1 09 | 00 00 41 fb ff ff 93 0b |010.....|..A.....|
|00001a80| fb 8c 03 00 1f 74 0d 00 | 64 1b f4 20 3e 20 42 61 |.....t..|d.. > Ba|
|00001a90| 73 69 63 50 72 6f 67 73 | 2e 53 79 73 46 58 30 31 |sicProgs|.SysFX01|
|00001aa0| 30 0d 00 6e 1f f4 20 41 | 75 74 68 6f 72 20 20 20 |0..n.. A|uthor |
|00001ab0| 20 20 20 20 3a 20 47 20 | 4c 20 46 69 74 74 6f 6e | : G |L Fitton|
|00001ac0| 0d 00 78 24 f4 20 43 6f | 70 79 72 69 67 68 74 20 |..x$. Co|pyright |
|00001ad0| 20 20 20 3a 20 41 42 41 | 43 55 53 20 54 52 41 49 | : ABA|CUS TRAI|
|00001ae0| 4e 49 4e 47 0d 00 82 24 | f4 20 56 65 72 73 69 6f |NING...$|. Versio|
|00001af0| 6e 20 30 2e 30 31 20 3a | 20 32 30 74 68 20 4d 61 |n 0.01 :| 20th Ma|
|00001b00| 72 63 68 20 31 39 38 39 | 0d 00 8c 05 3a 0d 00 96 |rch 1989|....:...|
|00001b10| 22 f4 20 44 65 6d 6f 6e | 73 74 72 61 74 65 73 20 |". Demon|strates |
|00001b20| 53 79 73 74 65 6d 20 53 | 70 72 69 74 65 73 2e 0d |System S|prites..|
|00001b30| 00 a0 05 3a 0d 00 aa 16 | f4 20 50 72 65 43 6f 72 |...:....|. PreCor|
|00001b40| 65 20 53 65 63 74 69 6f | 6e 2e 0d 00 b4 18 f4 20 |e Sectio|n...... |
|00001b50| 53 65 74 20 75 70 20 65 | 72 72 6f 72 20 74 72 61 |Set up e|rror tra|
|00001b60| 70 2e 0d 00 be 0e ee 20 | 85 20 f2 65 72 72 6f 72 |p...... |. .error|
|00001b70| 0d 00 c8 05 3a 0d 00 d2 | 16 f4 20 43 68 6f 6f 73 |....:...|.. Choos|
|00001b80| 65 20 74 68 65 20 6d 6f | 64 65 2e 0d 00 dc 08 eb |e the mo|de......|
|00001b90| 20 31 32 0d 00 e6 05 3a | 0d 00 f0 1f f4 20 44 65 | 12....:|..... De|
|00001ba0| 63 6c 61 72 65 20 67 6c | 6f 62 61 6c 20 76 61 72 |clare gl|obal var|
|00001bb0| 69 61 62 6c 65 73 2e 0d | 00 fa 05 3a 0d 01 04 05 |iables..|...:....|
|00001bc0| 3a 0d 03 e8 13 f4 20 43 | 6f 72 65 20 53 65 63 74 |:..... C|ore Sect|
|00001bd0| 69 6f 6e 2e 0d 03 f2 05 | 3a 0d 03 fc 09 2a 53 4e |ion.....|:....*SN|
|00001be0| 45 57 0d 04 06 0e f2 64 | 72 61 77 67 6c 6f 62 65 |EW.....d|rawglobe|
|00001bf0| 0d 04 10 0e f2 67 65 74 | 73 70 72 69 74 65 0d 04 |.....get|sprite..|
|00001c00| 1a 0f f2 73 61 76 65 73 | 70 72 69 74 65 0d 04 24 |...saves|prite..$|
|00001c10| 05 db 0d 04 2e 05 da 0d | 04 38 0f f2 6c 6f 61 64 |........|.8..load|
|00001c20| 73 70 72 69 74 65 0d 04 | 42 0e f2 70 75 74 73 70 |sprite..|B..putsp|
|00001c30| 72 69 74 65 0d 04 4c 05 | e0 0d 04 56 05 3a 0d 04 |rite..L.|...V.:..|
|00001c40| 60 05 3a 0d 27 10 0c dd | 20 f2 65 72 72 6f 72 0d |`.:.'...| .error.|
|00001c50| 27 1a 17 f4 20 52 65 70 | 6f 72 74 73 20 61 6e 20 |'... Rep|orts an |
|00001c60| 65 72 72 6f 72 2e 0d 27 | 24 05 3a 0d 27 2e 05 3a |error..'|$.:.'..:|
|00001c70| 0d 27 38 05 3a 0d 27 42 | 05 f6 0d 27 4c 13 f1 20 |.'8.:.'B|...'L.. |
|00001c80| 22 20 61 74 20 6c 69 6e | 65 20 22 3b 9e 0d 27 56 |" at lin|e ";..'V|
|00001c90| 05 e0 0d 27 60 05 3a 0d | 27 6a 05 3a 0d 27 74 10 |...'`.:.|'j.:.'t.|
|00001ca0| dd 20 f2 64 72 61 77 67 | 6c 6f 62 65 0d 27 7e 2b |. .drawg|lobe.'~+|
|00001cb0| f4 20 44 72 61 77 73 20 | 61 20 67 6c 6f 62 65 20 |. Draws |a globe |
|00001cc0| 74 6f 20 62 65 20 75 73 | 65 64 20 61 73 20 61 20 |to be us|ed as a |
|00001cd0| 73 70 72 69 74 65 2e 0d | 27 88 34 ea 20 6c 65 66 |sprite..|'.4. lef|
|00001ce0| 74 25 2c 62 6f 74 74 6f | 6d 25 2c 78 63 25 2c 79 |t%,botto|m%,xc%,y|
|00001cf0| 63 25 2c 73 69 7a 65 25 | 2c 72 61 64 25 2c 61 6e |c%,size%|,rad%,an|
|00001d00| 67 6c 65 31 2c 61 6e 67 | 6c 65 32 0d 27 92 05 3a |gle1,ang|le2.'..:|
|00001d10| 0d 27 9c 1b f4 20 49 6e | 69 74 69 61 6c 69 73 65 |.'... In|itialise|
|00001d20| 20 76 61 72 69 61 62 6c | 65 73 2e 0d 27 a6 11 73 | variabl|es..'..s|
|00001d30| 69 7a 65 25 20 20 20 3d | 20 35 31 32 0d 27 b0 1d |ize% =| 512.'..|
|00001d40| 6c 65 66 74 25 20 20 20 | 3d 20 36 34 30 20 20 20 |left% |= 640 |
|00001d50| 20 2d 73 69 7a 65 25 2f | 32 0d 27 ba 1d 62 6f 74 | -size%/|2.'..bot|
|00001d60| 74 6f 6d 25 20 3d 20 35 | 31 32 20 20 20 20 2d 73 |tom% = 5|12 -s|
|00001d70| 69 7a 65 25 2f 32 0d 27 | c4 1d 78 63 25 20 20 20 |ize%/2.'|..xc% |
|00001d80| 20 20 3d 20 6c 65 66 74 | 25 20 20 2b 73 69 7a 65 | = left|% +size|
|00001d90| 25 2f 32 0d 27 ce 1d 79 | 63 25 20 20 20 20 20 3d |%/2.'..y|c% =|
|00001da0| 20 62 6f 74 74 6f 6d 25 | 2b 73 69 7a 65 25 2f 32 | bottom%|+size%/2|
|00001db0| 0d 27 d8 15 72 61 64 25 | 20 20 20 20 3d 20 73 69 |.'..rad%| = si|
|00001dc0| 7a 65 25 2f 34 0d 27 e2 | 13 61 6e 67 6c 65 31 20 |ze%/4.'.|.angle1 |
|00001dd0| 20 3d 20 33 2a af 2f 38 | 0d 27 ec 18 61 6e 67 6c | = 3*./8|.'..angl|
|00001de0| 65 32 20 20 3d 20 61 6e | 67 6c 65 31 2d af 2f 32 |e2 = an|gle1-./2|
|00001df0| 0d 27 f6 05 3a 0d 28 00 | 16 f4 20 44 72 61 77 20 |.'..:.(.|.. Draw |
|00001e00| 67 6c 6f 62 65 20 61 78 | 69 73 2e 0d 28 0a 07 e6 |globe ax|is..(...|
|00001e10| 20 37 0d 28 14 29 c8 9d | 20 c8 90 20 78 63 25 2c | 7.(.)..| .. xc%,|
|00001e20| 79 63 25 2c 73 69 7a 65 | 25 2f 32 2c 73 69 7a 65 |yc%,size|%/2,size|
|00001e30| 25 2f 36 34 2c 61 6e 67 | 6c 65 31 0d 28 1e 05 3a |%/64,ang|le1.(..:|
|00001e40| 0d 28 28 1d f4 20 44 72 | 61 77 20 67 6c 6f 62 65 |.((.. Dr|aw globe|
|00001e50| 20 62 6f 74 74 6f 6d 20 | 68 61 6c 66 2e 0d 28 32 | bottom |half..(2|
|00001e60| 07 e6 20 34 0d 28 3c 0d | ec 20 78 63 25 2c 79 63 |.. 4.(<.|. xc%,yc|
|00001e70| 25 0d 28 46 2f ec 20 20 | 20 20 20 78 63 25 2d 72 |%.(F/. | xc%-r|
|00001e80| 61 64 25 2a 9b 28 61 6e | 67 6c 65 32 29 2c 79 63 |ad%*.(an|gle2),yc|
|00001e90| 25 2d 72 61 64 25 2a b5 | 28 61 6e 67 6c 65 32 29 |%-rad%*.|(angle2)|
|00001ea0| 0d 28 50 2f f0 20 26 42 | 35 2c 78 63 25 2b 72 61 |.(P/. &B|5,xc%+ra|
|00001eb0| 64 25 2a 9b 28 61 6e 67 | 6c 65 32 29 2c 79 63 25 |d%*.(ang|le2),yc%|
|00001ec0| 2b 72 61 64 25 2a b5 28 | 61 6e 67 6c 65 32 29 0d |+rad%*.(|angle2).|
|00001ed0| 28 5a 05 3a 0d 28 64 1b | f4 20 44 72 61 77 20 73 |(Z.:.(d.|. Draw s|
|00001ee0| 61 74 65 6c 6c 69 74 65 | 20 6f 72 62 69 74 2e 0d |atellite| orbit..|
|00001ef0| 28 6e 07 e6 20 36 0d 28 | 78 25 c8 9d 20 78 63 25 |(n.. 6.(|x%.. xc%|
|00001f00| 2c 79 63 25 2c 73 69 7a | 65 25 2f 38 2c 73 69 7a |,yc%,siz|e%/8,siz|
|00001f10| 65 25 2f 32 2c 61 6e 67 | 6c 65 31 0d 28 82 05 3a |e%/2,ang|le1.(..:|
|00001f20| 0d 28 8c 1a f4 20 44 72 | 61 77 20 67 6c 6f 62 65 |.(... Dr|aw globe|
|00001f30| 20 74 6f 70 20 68 61 6c | 66 2e 0d 28 96 07 e6 20 | top hal|f..(... |
|00001f40| 34 0d 28 a0 0d ec 20 78 | 63 25 2c 79 63 25 0d 28 |4.(... x|c%,yc%.(|
|00001f50| aa 2f ec 20 20 20 20 20 | 78 63 25 2b 72 61 64 25 |./. |xc%+rad%|
|00001f60| 2a 9b 28 61 6e 67 6c 65 | 32 29 2c 79 63 25 2b 72 |*.(angle|2),yc%+r|
|00001f70| 61 64 25 2a b5 28 61 6e | 67 6c 65 32 29 0d 28 b4 |ad%*.(an|gle2).(.|
|00001f80| 2f f0 20 26 42 35 2c 78 | 63 25 2d 72 61 64 25 2a |/. &B5,x|c%-rad%*|
|00001f90| 9b 28 61 6e 67 6c 65 32 | 29 2c 79 63 25 2d 72 61 |.(angle2|),yc%-ra|
|00001fa0| 64 25 2a b5 28 61 6e 67 | 6c 65 32 29 0d 28 be 05 |d%*.(ang|le2).(..|
|00001fb0| 3a 0d 28 c8 05 3a 0d 28 | d2 05 3a 0d 28 dc 05 3a |:.(..:.(|..:.(..:|
|00001fc0| 0d 28 e6 05 3a 0d 28 f0 | 05 e1 0d 28 fa 05 3a 0d |.(..:.(.|...(..:.|
|00001fd0| 29 04 10 dd 20 f2 67 65 | 74 73 70 72 69 74 65 0d |)... .ge|tsprite.|
|00001fe0| 29 0e 28 f4 20 50 69 63 | 6b 20 20 75 70 20 61 20 |).(. Pic|k up a |
|00001ff0| 73 70 72 69 74 65 20 66 | 72 6f 6d 20 74 68 65 20 |sprite f|rom the |
|00002000| 73 63 72 65 65 6e 2e 0d | 29 18 28 f4 20 53 61 76 |screen..|).(. Sav|
|00002010| 65 20 69 74 20 69 6e 20 | 74 68 65 20 73 79 73 74 |e it in |the syst|
|00002020| 65 6d 20 73 70 72 69 74 | 65 20 61 72 65 61 2e 0d |em sprit|e area..|
|00002030| 29 22 25 ea 20 6c 65 66 | 74 25 2c 62 6f 74 74 6f |)"%. lef|t%,botto|
|00002040| 6d 25 2c 73 69 7a 65 25 | 2c 72 69 67 68 74 25 2c |m%,size%|,right%,|
|00002050| 74 6f 70 25 0d 29 2c 05 | 3a 0d 29 36 1b f4 20 49 |top%.),.|:.)6.. I|
|00002060| 6e 69 74 69 61 6c 69 73 | 65 20 76 61 72 69 61 62 |nitialis|e variab|
|00002070| 6c 65 73 2e 0d 29 40 11 | 73 69 7a 65 25 20 20 20 |les..)@.|size% |
|00002080| 3d 20 35 31 32 0d 29 4a | 1d 6c 65 66 74 25 20 20 |= 512.)J|.left% |
|00002090| 20 3d 20 36 34 30 20 20 | 20 20 2d 73 69 7a 65 25 | = 640 | -size%|
|000020a0| 2f 32 0d 29 54 1d 62 6f | 74 74 6f 6d 25 20 3d 20 |/2.)T.bo|ttom% = |
|000020b0| 35 31 32 20 20 20 20 2d | 73 69 7a 65 25 2f 32 0d |512 -|size%/2.|
|000020c0| 29 5e 1d 72 69 67 68 74 | 25 20 20 3d 20 6c 65 66 |)^.right|% = lef|
|000020d0| 74 25 20 20 2b 73 69 7a | 65 25 2d 31 0d 29 68 1d |t% +siz|e%-1.)h.|
|000020e0| 74 6f 70 25 20 20 20 20 | 3d 20 62 6f 74 74 6f 6d |top% |= bottom|
|000020f0| 25 2b 73 69 7a 65 25 2d | 31 0d 29 72 05 3a 0d 29 |%+size%-|1.)r.:.)|
|00002100| 7c 14 ec 20 6c 65 66 74 | 25 20 2c 62 6f 74 74 6f ||.. left|% ,botto|
|00002110| 6d 25 0d 29 86 11 ec 20 | 72 69 67 68 74 25 2c 74 |m%.)... |right%,t|
|00002120| 6f 70 25 0d 29 90 05 3a | 0d 29 9a 05 3a 0d 29 a4 |op%.)..:|.)..:.).|
|00002130| 0f 2a 53 47 45 54 20 67 | 6c 6f 62 65 0d 29 ae 05 |.*SGET g|lobe.)..|
|00002140| 3a 0d 29 b8 05 e1 0d 29 | c2 05 3a 0d 29 cc 11 dd |:.)....)|..:.)...|
|00002150| 20 f2 73 61 76 65 73 70 | 72 69 74 65 0d 29 d6 24 | .savesp|rite.).$|
|00002160| f4 20 53 61 76 65 73 20 | 74 68 65 20 73 70 72 69 |. Saves |the spri|
|00002170| 74 65 20 61 72 65 61 20 | 74 6f 20 64 69 73 63 2e |te area |to disc.|
|00002180| 0d 29 e0 05 3a 0d 29 ea | 1f 2a 53 53 41 56 45 20 |.)..:.).|.*SSAVE |
|00002190| 4d 79 53 70 72 69 74 65 | 73 2e 53 70 72 69 74 65 |MySprite|s.Sprite|
|000021a0| 46 69 6c 65 0d 29 f4 05 | 3a 0d 29 fe 05 3a 0d 2a |File.)..|:.)..:.*|
|000021b0| 08 05 3a 0d 2a 12 05 3a | 0d 2a 1c 05 e1 0d 2a 26 |..:.*..:|.*....*&|
|000021c0| 05 3a 0d 2a 30 11 dd 20 | f2 6c 6f 61 64 73 70 72 |.:.*0.. |.loadspr|
|000021d0| 69 74 65 0d 2a 3a 24 f4 | 20 4c 6f 61 64 73 20 61 |ite.*:$.| Loads a|
|000021e0| 20 73 70 72 69 74 65 20 | 66 69 6c 65 20 66 72 6f | sprite |file fro|
|000021f0| 6d 20 64 69 73 63 2e 0d | 2a 44 05 3a 0d 2a 4e 1f |m disc..|*D.:.*N.|
|00002200| 2a 53 4c 4f 41 44 20 4d | 79 53 70 72 69 74 65 73 |*SLOAD M|ySprites|
|00002210| 2e 53 70 72 69 74 65 46 | 69 6c 65 0d 2a 58 05 3a |.SpriteF|ile.*X.:|
|00002220| 0d 2a 62 05 3a 0d 2a 6c | 05 3a 0d 2a 76 05 3a 0d |.*b.:.*l|.:.*v.:.|
|00002230| 2a 80 05 e1 0d 2a 8a 05 | 3a 0d 2a 94 10 dd 20 f2 |*....*..|:.*... .|
|00002240| 70 75 74 73 70 72 69 74 | 65 0d 2a 9e 22 f4 20 50 |putsprit|e.*.". P|
|00002250| 6c 6f 74 73 20 61 20 73 | 70 72 69 74 65 20 74 6f |lots a s|prite to|
|00002260| 20 74 68 65 20 73 63 72 | 65 65 6e 0d 2a a8 23 f4 | the scr|een.*.#.|
|00002270| 20 20 66 72 6f 6d 20 74 | 68 65 20 73 79 73 74 65 | from t|he syste|
|00002280| 6d 20 73 70 72 69 74 65 | 20 61 72 65 61 2e 0d 2a |m sprite| area..*|
|00002290| b2 21 ea 20 6c 65 66 74 | 25 2c 62 6f 74 74 6f 6d |.!. left|%,bottom|
|000022a0| 25 2c 78 73 74 65 70 25 | 2c 79 73 74 65 70 25 0d |%,xstep%|,ystep%.|
|000022b0| 2a bc 05 3a 0d 2a c6 1b | f4 20 49 6e 69 74 69 61 |*..:.*..|. Initia|
|000022c0| 6c 69 73 65 20 76 61 72 | 69 61 62 6c 65 73 2e 0d |lise var|iables..|
|000022d0| 2a d0 11 6c 65 66 74 25 | 20 20 20 3d 20 31 32 38 |*..left%| = 128|
|000022e0| 0d 2a da 11 62 6f 74 74 | 6f 6d 25 20 3d 20 31 32 |.*..bott|om% = 12|
|000022f0| 38 0d 2a e4 11 78 73 74 | 65 70 25 20 20 3d 20 33 |8.*..xst|ep% = 3|
|00002300| 38 34 0d 2a ee 11 79 73 | 74 65 70 25 20 20 3d 20 |84.*..ys|tep% = |
|00002310| 33 38 34 0d 2a f8 05 3a | 0d 2b 02 18 f4 20 43 68 |384.*..:|.+... Ch|
|00002320| 6f 6f 73 65 20 74 68 65 | 20 73 70 72 69 74 65 2e |oose the| sprite.|
|00002330| 0d 2b 0c 12 2a 53 43 48 | 4f 4f 53 45 20 67 6c 6f |.+..*SCH|OOSE glo|
|00002340| 62 65 0d 2b 16 05 3a 0d | 2b 20 11 f4 20 55 73 65 |be.+..:.|+ .. Use|
|00002350| 20 61 20 6d 61 73 6b 2e | 0d 2b 2a 09 e6 20 38 2c | a mask.|.+*.. 8,|
|00002360| 30 0d 2b 34 05 3a 0d 2b | 3e 21 f4 20 50 6c 6f 74 |0.+4.:.+|>!. Plot|
|00002370| 20 74 68 65 20 73 70 72 | 69 74 65 20 66 6f 75 72 | the spr|ite four|
|00002380| 20 74 69 6d 65 73 2e 0d | 2b 48 1e f0 20 26 45 44 | times..|+H.. &ED|
|00002390| 2c 6c 65 66 74 25 20 20 | 20 20 20 20 20 2c 62 6f |,left% | ,bo|
|000023a0| 74 74 6f 6d 25 0d 2b 52 | 1e f0 20 26 45 44 2c 6c |ttom%.+R|.. &ED,l|
|000023b0| 65 66 74 25 2b 78 73 74 | 65 70 25 2c 62 6f 74 74 |eft%+xst|ep%,bott|
|000023c0| 6f 6d 25 0d 2b 5c 25 f0 | 20 26 45 44 2c 6c 65 66 |om%.+\%.| &ED,lef|
|000023d0| 74 25 2b 78 73 74 65 70 | 25 2c 62 6f 74 74 6f 6d |t%+xstep|%,bottom|
|000023e0| 25 2b 79 73 74 65 70 25 | 0d 2b 66 25 f0 20 26 45 |%+ystep%|.+f%. &E|
|000023f0| 44 2c 6c 65 66 74 25 20 | 20 20 20 20 20 20 2c 62 |D,left% | ,b|
|00002400| 6f 74 74 6f 6d 25 2b 79 | 73 74 65 70 25 0d 2b 70 |ottom%+y|step%.+p|
|00002410| 05 3a 0d 2b 7a 05 3a 0d | 2b 84 05 3a 0d 2b 8e 05 |.:.+z.:.|+..:.+..|
|00002420| 3a 0d 2b 98 05 e1 0d 2b | a2 05 3a 0d 2b ac 05 3a |:.+....+|..:.+..:|
|00002430| 0d 2b b6 05 3a 0d ff 46 | 69 6c 65 44 61 74 61 82 |.+..:..F|ileData.|
|00002440| 53 79 73 46 58 30 31 31 | 00 00 00 95 09 00 00 41 |SysFX011|.......A|
|00002450| fb ff ff 9c 70 f7 8c 03 | 00 1c 3d 0d 00 64 1b f4 |....p...|..=..d..|
|00002460| 20 3e 20 42 61 73 69 63 | 50 72 6f 67 73 2e 53 79 | > Basic|Progs.Sy|
|00002470| 73 46 58 30 31 31 0d 00 | 6e 1f f4 20 41 75 74 68 |sFX011..|n.. Auth|
|00002480| 6f 72 20 20 20 20 20 20 | 20 3a 20 47 20 4c 20 46 |or | : G L F|
|00002490| 69 74 74 6f 6e 0d 00 78 | 24 f4 20 43 6f 70 79 72 |itton..x|$. Copyr|
|000024a0| 69 67 68 74 20 20 20 20 | 3a 20 41 42 41 43 55 53 |ight |: ABACUS|
|000024b0| 20 54 52 41 49 4e 49 4e | 47 0d 00 82 24 f4 20 56 | TRAININ|G...$. V|
|000024c0| 65 72 73 69 6f 6e 20 30 | 2e 30 31 20 3a 20 32 30 |ersion 0|.01 : 20|
|000024d0| 74 68 20 4d 61 72 63 68 | 20 31 39 38 39 0d 00 8c |th March| 1989...|
|000024e0| 05 3a 0d 00 96 22 f4 20 | 44 65 6d 6f 6e 73 74 72 |.:...". |Demonstr|
|000024f0| 61 74 65 73 20 53 79 73 | 74 65 6d 20 53 70 72 69 |ates Sys|tem Spri|
|00002500| 74 65 73 2e 0d 00 a0 05 | 3a 0d 00 aa 16 f4 20 50 |tes.....|:..... P|
|00002510| 72 65 43 6f 72 65 20 53 | 65 63 74 69 6f 6e 2e 0d |reCore S|ection..|
|00002520| 00 b4 18 f4 20 53 65 74 | 20 75 70 20 65 72 72 6f |.... Set| up erro|
|00002530| 72 20 74 72 61 70 2e 0d | 00 be 0e ee 20 85 20 f2 |r trap..|.... . .|
|00002540| 65 72 72 6f 72 0d 00 c8 | 05 3a 0d 00 d2 16 f4 20 |error...|.:..... |
|00002550| 43 68 6f 6f 73 65 20 74 | 68 65 20 6d 6f 64 65 2e |Choose t|he mode.|
|00002560| 0d 00 dc 08 eb 20 31 32 | 0d 00 e6 05 3a 0d 00 f0 |..... 12|....:...|
|00002570| 1f f4 20 44 65 63 6c 61 | 72 65 20 67 6c 6f 62 61 |.. Decla|re globa|
|00002580| 6c 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 00 fa 05 |l variab|les.....|
|00002590| 3a 0d 01 04 05 3a 0d 03 | e8 13 f4 20 43 6f 72 65 |:....:..|... Core|
|000025a0| 20 53 65 63 74 69 6f 6e | 2e 0d 03 f2 05 3a 0d 03 | Section|.....:..|
|000025b0| fc 09 2a 53 4e 45 57 0d | 04 06 05 3a 0d 04 10 05 |..*SNEW.|...:....|
|000025c0| 3a 0d 04 1a 05 3a 0d 04 | 24 05 3a 0d 04 2e 05 3a |:....:..|$.:....:|
|000025d0| 0d 04 38 0f f2 6c 6f 61 | 64 73 70 72 69 74 65 0d |..8..loa|dsprite.|
|000025e0| 04 42 0e f2 70 75 74 73 | 70 72 69 74 65 0d 04 4c |.B..puts|prite..L|
|000025f0| 05 e0 0d 04 56 05 3a 0d | 04 60 05 3a 0d 27 10 0c |....V.:.|.`.:.'..|
|00002600| dd 20 f2 65 72 72 6f 72 | 0d 27 1a 17 f4 20 52 65 |. .error|.'... Re|
|00002610| 70 6f 72 74 73 20 61 6e | 20 65 72 72 6f 72 2e 0d |ports an| error..|
|00002620| 27 24 05 3a 0d 27 2e 05 | 3a 0d 27 38 05 3a 0d 27 |'$.:.'..|:.'8.:.'|
|00002630| 42 05 f6 0d 27 4c 13 f1 | 20 22 20 61 74 20 6c 69 |B...'L..| " at li|
|00002640| 6e 65 20 22 3b 9e 0d 27 | 56 05 e0 0d 27 60 05 3a |ne ";..'|V...'`.:|
|00002650| 0d 27 6a 05 3a 0d 27 74 | 10 dd 20 f2 64 72 61 77 |.'j.:.'t|.. .draw|
|00002660| 67 6c 6f 62 65 0d 27 7e | 2b f4 20 44 72 61 77 73 |globe.'~|+. Draws|
|00002670| 20 61 20 67 6c 6f 62 65 | 20 74 6f 20 62 65 20 75 | a globe| to be u|
|00002680| 73 65 64 20 61 73 20 61 | 20 73 70 72 69 74 65 2e |sed as a| sprite.|
|00002690| 0d 27 88 34 ea 20 6c 65 | 66 74 25 2c 62 6f 74 74 |.'.4. le|ft%,bott|
|000026a0| 6f 6d 25 2c 78 63 25 2c | 79 63 25 2c 73 69 7a 65 |om%,xc%,|yc%,size|
|000026b0| 25 2c 72 61 64 25 2c 61 | 6e 67 6c 65 31 2c 61 6e |%,rad%,a|ngle1,an|
|000026c0| 67 6c 65 32 0d 27 92 05 | 3a 0d 27 9c 1b f4 20 49 |gle2.'..|:.'... I|
|000026d0| 6e 69 74 69 61 6c 69 73 | 65 20 76 61 72 69 61 62 |nitialis|e variab|
|000026e0| 6c 65 73 2e 0d 27 a6 11 | 73 69 7a 65 25 20 20 20 |les..'..|size% |
|000026f0| 3d 20 35 31 32 0d 27 b0 | 1d 6c 65 66 74 25 20 20 |= 512.'.|.left% |
|00002700| 20 3d 20 36 34 30 20 20 | 20 20 2d 73 69 7a 65 25 | = 640 | -size%|
|00002710| 2f 32 0d 27 ba 1d 62 6f | 74 74 6f 6d 25 20 3d 20 |/2.'..bo|ttom% = |
|00002720| 35 31 32 20 20 20 20 2d | 73 69 7a 65 25 2f 32 0d |512 -|size%/2.|
|00002730| 27 c4 1d 78 63 25 20 20 | 20 20 20 3d 20 6c 65 66 |'..xc% | = lef|
|00002740| 74 25 20 20 2b 73 69 7a | 65 25 2f 32 0d 27 ce 1d |t% +siz|e%/2.'..|
|00002750| 79 63 25 20 20 20 20 20 | 3d 20 62 6f 74 74 6f 6d |yc% |= bottom|
|00002760| 25 2b 73 69 7a 65 25 2f | 32 0d 27 d8 15 72 61 64 |%+size%/|2.'..rad|
|00002770| 25 20 20 20 20 3d 20 73 | 69 7a 65 25 2f 34 0d 27 |% = s|ize%/4.'|
|00002780| e2 13 61 6e 67 6c 65 31 | 20 20 3d 20 33 2a af 2f |..angle1| = 3*./|
|00002790| 38 0d 27 ec 18 61 6e 67 | 6c 65 32 20 20 3d 20 61 |8.'..ang|le2 = a|
|000027a0| 6e 67 6c 65 31 2d af 2f | 32 0d 27 f6 05 3a 0d 28 |ngle1-./|2.'..:.(|
|000027b0| 00 16 f4 20 44 72 61 77 | 20 67 6c 6f 62 65 20 61 |... Draw| globe a|
|000027c0| 78 69 73 2e 0d 28 0a 07 | e6 20 37 0d 28 14 29 c8 |xis..(..|. 7.(.).|
|000027d0| 9d 20 c8 90 20 78 63 25 | 2c 79 63 25 2c 73 69 7a |. .. xc%|,yc%,siz|
|000027e0| 65 25 2f 32 2c 73 69 7a | 65 25 2f 36 34 2c 61 6e |e%/2,siz|e%/64,an|
|000027f0| 67 6c 65 31 0d 28 1e 05 | 3a 0d 28 28 1d f4 20 44 |gle1.(..|:.((.. D|
|00002800| 72 61 77 20 67 6c 6f 62 | 65 20 62 6f 74 74 6f 6d |raw glob|e bottom|
|00002810| 20 68 61 6c 66 2e 0d 28 | 32 07 e6 20 34 0d 28 3c | half..(|2.. 4.(<|
|00002820| 0d ec 20 78 63 25 2c 79 | 63 25 0d 28 46 2f ec 20 |.. xc%,y|c%.(F/. |
|00002830| 20 20 20 20 78 63 25 2d | 72 61 64 25 2a 9b 28 61 | xc%-|rad%*.(a|
|00002840| 6e 67 6c 65 32 29 2c 79 | 63 25 2d 72 61 64 25 2a |ngle2),y|c%-rad%*|
|00002850| b5 28 61 6e 67 6c 65 32 | 29 0d 28 50 2f f0 20 26 |.(angle2|).(P/. &|
|00002860| 42 35 2c 78 63 25 2b 72 | 61 64 25 2a 9b 28 61 6e |B5,xc%+r|ad%*.(an|
|00002870| 67 6c 65 32 29 2c 79 63 | 25 2b 72 61 64 25 2a b5 |gle2),yc|%+rad%*.|
|00002880| 28 61 6e 67 6c 65 32 29 | 0d 28 5a 05 3a 0d 28 64 |(angle2)|.(Z.:.(d|
|00002890| 1b f4 20 44 72 61 77 20 | 73 61 74 65 6c 6c 69 74 |.. Draw |satellit|
|000028a0| 65 20 6f 72 62 69 74 2e | 0d 28 6e 07 e6 20 36 0d |e orbit.|.(n.. 6.|
|000028b0| 28 78 25 c8 9d 20 78 63 | 25 2c 79 63 25 2c 73 69 |(x%.. xc|%,yc%,si|
|000028c0| 7a 65 25 2f 38 2c 73 69 | 7a 65 25 2f 32 2c 61 6e |ze%/8,si|ze%/2,an|
|000028d0| 67 6c 65 31 0d 28 82 05 | 3a 0d 28 8c 1a f4 20 44 |gle1.(..|:.(... D|
|000028e0| 72 61 77 20 67 6c 6f 62 | 65 20 74 6f 70 20 68 61 |raw glob|e top ha|
|000028f0| 6c 66 2e 0d 28 96 07 e6 | 20 34 0d 28 a0 0d ec 20 |lf..(...| 4.(... |
|00002900| 78 63 25 2c 79 63 25 0d | 28 aa 2f ec 20 20 20 20 |xc%,yc%.|(./. |
|00002910| 20 78 63 25 2b 72 61 64 | 25 2a 9b 28 61 6e 67 6c | xc%+rad|%*.(angl|
|00002920| 65 32 29 2c 79 63 25 2b | 72 61 64 25 2a b5 28 61 |e2),yc%+|rad%*.(a|
|00002930| 6e 67 6c 65 32 29 0d 28 | b4 2f f0 20 26 42 35 2c |ngle2).(|./. &B5,|
|00002940| 78 63 25 2d 72 61 64 25 | 2a 9b 28 61 6e 67 6c 65 |xc%-rad%|*.(angle|
|00002950| 32 29 2c 79 63 25 2d 72 | 61 64 25 2a b5 28 61 6e |2),yc%-r|ad%*.(an|
|00002960| 67 6c 65 32 29 0d 28 be | 05 3a 0d 28 c8 05 3a 0d |gle2).(.|.:.(..:.|
|00002970| 28 d2 05 3a 0d 28 dc 05 | 3a 0d 28 e6 05 3a 0d 28 |(..:.(..|:.(..:.(|
|00002980| f0 05 e1 0d 28 fa 05 3a | 0d 29 04 10 dd 20 f2 67 |....(..:|.)... .g|
|00002990| 65 74 73 70 72 69 74 65 | 0d 29 0e 28 f4 20 50 69 |etsprite|.).(. Pi|
|000029a0| 63 6b 20 20 75 70 20 61 | 20 73 70 72 69 74 65 20 |ck up a| sprite |
|000029b0| 66 72 6f 6d 20 74 68 65 | 20 73 63 72 65 65 6e 2e |from the| screen.|
|000029c0| 0d 29 18 28 f4 20 53 61 | 76 65 20 69 74 20 69 6e |.).(. Sa|ve it in|
|000029d0| 20 74 68 65 20 73 79 73 | 74 65 6d 20 73 70 72 69 | the sys|tem spri|
|000029e0| 74 65 20 61 72 65 61 2e | 0d 29 22 25 ea 20 6c 65 |te area.|.)"%. le|
|000029f0| 66 74 25 2c 62 6f 74 74 | 6f 6d 25 2c 73 69 7a 65 |ft%,bott|om%,size|
|00002a00| 25 2c 72 69 67 68 74 25 | 2c 74 6f 70 25 0d 29 2c |%,right%|,top%.),|
|00002a10| 05 3a 0d 29 36 1b f4 20 | 49 6e 69 74 69 61 6c 69 |.:.)6.. |Initiali|
|00002a20| 73 65 20 76 61 72 69 61 | 62 6c 65 73 2e 0d 29 40 |se varia|bles..)@|
|00002a30| 11 73 69 7a 65 25 20 20 | 20 3d 20 35 31 32 0d 29 |.size% | = 512.)|
|00002a40| 4a 1d 6c 65 66 74 25 20 | 20 20 3d 20 36 34 30 20 |J.left% | = 640 |
|00002a50| 20 20 20 2d 73 69 7a 65 | 25 2f 32 0d 29 54 1d 62 | -size|%/2.)T.b|
|00002a60| 6f 74 74 6f 6d 25 20 3d | 20 35 31 32 20 20 20 20 |ottom% =| 512 |
|00002a70| 2d 73 69 7a 65 25 2f 32 | 0d 29 5e 1d 72 69 67 68 |-size%/2|.)^.righ|
|00002a80| 74 25 20 20 3d 20 6c 65 | 66 74 25 20 20 2b 73 69 |t% = le|ft% +si|
|00002a90| 7a 65 25 2d 31 0d 29 68 | 1d 74 6f 70 25 20 20 20 |ze%-1.)h|.top% |
|00002aa0| 20 3d 20 62 6f 74 74 6f | 6d 25 2b 73 69 7a 65 25 | = botto|m%+size%|
|00002ab0| 2d 31 0d 29 72 05 3a 0d | 29 7c 14 ec 20 6c 65 66 |-1.)r.:.|)|.. lef|
|00002ac0| 74 25 20 2c 62 6f 74 74 | 6f 6d 25 0d 29 86 11 ec |t% ,bott|om%.)...|
|00002ad0| 20 72 69 67 68 74 25 2c | 74 6f 70 25 0d 29 90 05 | right%,|top%.)..|
|00002ae0| 3a 0d 29 9a 05 3a 0d 29 | a4 0f 2a 53 47 45 54 20 |:.)..:.)|..*SGET |
|00002af0| 67 6c 6f 62 65 0d 29 ae | 05 3a 0d 29 b8 05 e1 0d |globe.).|.:.)....|
|00002b00| 29 c2 05 3a 0d 29 cc 11 | dd 20 f2 73 61 76 65 73 |)..:.)..|. .saves|
|00002b10| 70 72 69 74 65 0d 29 d6 | 24 f4 20 53 61 76 65 73 |prite.).|$. Saves|
|00002b20| 20 74 68 65 20 73 70 72 | 69 74 65 20 61 72 65 61 | the spr|ite area|
|00002b30| 20 74 6f 20 64 69 73 63 | 2e 0d 29 e0 05 3a 0d 29 | to disc|..)..:.)|
|00002b40| ea 1f 2a 53 53 41 56 45 | 20 4d 79 53 70 72 69 74 |..*SSAVE| MySprit|
|00002b50| 65 73 2e 53 70 72 69 74 | 65 46 69 6c 65 0d 29 f4 |es.Sprit|eFile.).|
|00002b60| 05 3a 0d 29 fe 05 3a 0d | 2a 08 05 3a 0d 2a 12 05 |.:.)..:.|*..:.*..|
|00002b70| 3a 0d 2a 1c 05 e1 0d 2a | 26 05 3a 0d 2a 30 11 dd |:.*....*|&.:.*0..|
|00002b80| 20 f2 6c 6f 61 64 73 70 | 72 69 74 65 0d 2a 3a 24 | .loadsp|rite.*:$|
|00002b90| f4 20 4c 6f 61 64 73 20 | 61 20 73 70 72 69 74 65 |. Loads |a sprite|
|00002ba0| 20 66 69 6c 65 20 66 72 | 6f 6d 20 64 69 73 63 2e | file fr|om disc.|
|00002bb0| 0d 2a 44 05 3a 0d 2a 4e | 1f 2a 53 4c 4f 41 44 20 |.*D.:.*N|.*SLOAD |
|00002bc0| 4d 79 53 70 72 69 74 65 | 73 2e 53 70 72 69 74 65 |MySprite|s.Sprite|
|00002bd0| 46 69 6c 65 0d 2a 58 05 | 3a 0d 2a 62 05 3a 0d 2a |File.*X.|:.*b.:.*|
|00002be0| 6c 05 3a 0d 2a 76 05 3a | 0d 2a 80 05 e1 0d 2a 8a |l.:.*v.:|.*....*.|
|00002bf0| 05 3a 0d 2a 94 10 dd 20 | f2 70 75 74 73 70 72 69 |.:.*... |.putspri|
|00002c00| 74 65 0d 2a 9e 22 f4 20 | 50 6c 6f 74 73 20 61 20 |te.*.". |Plots a |
|00002c10| 73 70 72 69 74 65 20 74 | 6f 20 74 68 65 20 73 63 |sprite t|o the sc|
|00002c20| 72 65 65 6e 0d 2a a8 23 | f4 20 20 66 72 6f 6d 20 |reen.*.#|. from |
|00002c30| 74 68 65 20 73 79 73 74 | 65 6d 20 73 70 72 69 74 |the syst|em sprit|
|00002c40| 65 20 61 72 65 61 2e 0d | 2a b2 21 ea 20 6c 65 66 |e area..|*.!. lef|
|00002c50| 74 25 2c 62 6f 74 74 6f | 6d 25 2c 78 73 74 65 70 |t%,botto|m%,xstep|
|00002c60| 25 2c 79 73 74 65 70 25 | 0d 2a bc 05 3a 0d 2a c6 |%,ystep%|.*..:.*.|
|00002c70| 1b f4 20 49 6e 69 74 69 | 61 6c 69 73 65 20 76 61 |.. Initi|alise va|
|00002c80| 72 69 61 62 6c 65 73 2e | 0d 2a d0 11 6c 65 66 74 |riables.|.*..left|
|00002c90| 25 20 20 20 3d 20 31 32 | 38 0d 2a da 11 62 6f 74 |% = 12|8.*..bot|
|00002ca0| 74 6f 6d 25 20 3d 20 31 | 32 38 0d 2a e4 11 78 73 |tom% = 1|28.*..xs|
|00002cb0| 74 65 70 25 20 20 3d 20 | 33 38 34 0d 2a ee 11 79 |tep% = |384.*..y|
|00002cc0| 73 74 65 70 25 20 20 3d | 20 33 38 34 0d 2a f8 05 |step% =| 384.*..|
|00002cd0| 3a 0d 2b 02 18 f4 20 43 | 68 6f 6f 73 65 20 74 68 |:.+... C|hoose th|
|00002ce0| 65 20 73 70 72 69 74 65 | 2e 0d 2b 0c 12 2a 53 43 |e sprite|..+..*SC|
|00002cf0| 48 4f 4f 53 45 20 67 6c | 6f 62 65 0d 2b 16 05 3a |HOOSE gl|obe.+..:|
|00002d00| 0d 2b 20 11 f4 20 55 73 | 65 20 61 20 6d 61 73 6b |.+ .. Us|e a mask|
|00002d10| 2e 0d 2b 2a 09 e6 20 38 | 2c 30 0d 2b 34 05 3a 0d |..+*.. 8|,0.+4.:.|
|00002d20| 2b 3e 21 f4 20 50 6c 6f | 74 20 74 68 65 20 73 70 |+>!. Plo|t the sp|
|00002d30| 72 69 74 65 20 66 6f 75 | 72 20 74 69 6d 65 73 2e |rite fou|r times.|
|00002d40| 0d 2b 48 1e f0 20 26 45 | 44 2c 6c 65 66 74 25 20 |.+H.. &E|D,left% |
|00002d50| 20 20 20 20 20 20 2c 62 | 6f 74 74 6f 6d 25 0d 2b | ,b|ottom%.+|
|00002d60| 52 1e f0 20 26 45 44 2c | 6c 65 66 74 25 2b 78 73 |R.. &ED,|left%+xs|
|00002d70| 74 65 70 25 2c 62 6f 74 | 74 6f 6d 25 0d 2b 5c 25 |tep%,bot|tom%.+\%|
|00002d80| f0 20 26 45 44 2c 6c 65 | 66 74 25 2b 78 73 74 65 |. &ED,le|ft%+xste|
|00002d90| 70 25 2c 62 6f 74 74 6f | 6d 25 2b 79 73 74 65 70 |p%,botto|m%+ystep|
|00002da0| 25 0d 2b 66 25 f0 20 26 | 45 44 2c 6c 65 66 74 25 |%.+f%. &|ED,left%|
|00002db0| 20 20 20 20 20 20 20 2c | 62 6f 74 74 6f 6d 25 2b | ,|bottom%+|
|00002dc0| 79 73 74 65 70 25 0d 2b | 70 05 3a 0d 2b 7a 05 3a |ystep%.+|p.:.+z.:|
|00002dd0| 0d 2b 84 05 3a 0d 2b 8e | 05 3a 0d 2b 98 05 e1 0d |.+..:.+.|.:.+....|
|00002de0| 2b a2 05 3a 0d 2b ac 05 | 3a 0d 2b b6 05 3a 0d ff |+..:.+..|:.+..:..|
|00002df0| 46 69 6c 65 44 61 74 61 | 82 53 79 73 46 58 30 32 |FileData|.SysFX02|
|00002e00| 30 00 00 00 61 0a 00 00 | 41 fb ff ff 24 3e ff 8c |0...a...|A...$>..|
|00002e10| 03 00 6a cb 0d 00 64 27 | f4 20 3e 20 3c 53 79 73 |..j...d'|. > <Sys|
|00002e20| 46 58 24 44 69 72 3e 2e | 42 61 73 69 63 50 72 6f |FX$Dir>.|BasicPro|
|00002e30| 67 73 2e 53 79 73 46 58 | 30 32 30 0d 00 6e 1f f4 |gs.SysFX|020..n..|
|00002e40| 20 41 75 74 68 6f 72 20 | 20 20 20 20 20 20 3a 20 | Author | : |
|00002e50| 47 20 4c 20 46 69 74 74 | 6f 6e 0d 00 78 24 f4 20 |G L Fitt|on..x$. |
|00002e60| 43 6f 70 79 72 69 67 68 | 74 20 20 20 20 3a 20 41 |Copyrigh|t : A|
|00002e70| 42 41 43 55 53 20 54 52 | 41 49 4e 49 4e 47 0d 00 |BACUS TR|AINING..|
|00002e80| 82 24 f4 20 56 65 72 73 | 69 6f 6e 20 30 2e 30 30 |.$. Vers|ion 0.00|
|00002e90| 20 3a 20 32 30 74 68 20 | 4d 61 72 63 68 20 31 39 | : 20th |March 19|
|00002ea0| 38 39 0d 00 8c 05 3a 0d | 00 96 22 f4 20 44 65 6d |89....:.|..". Dem|
|00002eb0| 6f 6e 73 74 72 61 74 65 | 73 20 53 79 73 74 65 6d |onstrate|s System|
|00002ec0| 20 53 70 72 69 74 65 73 | 2e 0d 00 a0 05 3a 0d 00 | Sprites|.....:..|
|00002ed0| aa 16 f4 20 50 72 65 43 | 6f 72 65 20 53 65 63 74 |... PreC|ore Sect|
|00002ee0| 69 6f 6e 2e 0d 00 b4 18 | f4 20 53 65 74 20 75 70 |ion.....|. Set up|
|00002ef0| 20 65 72 72 6f 72 20 74 | 72 61 70 2e 0d 00 be 0e | error t|rap.....|
|00002f00| ee 20 85 20 f2 65 72 72 | 6f 72 0d 00 c8 05 3a 0d |. . .err|or....:.|
|00002f10| 00 d2 16 f4 20 43 68 6f | 6f 73 65 20 74 68 65 20 |.... Cho|ose the |
|00002f20| 6d 6f 64 65 2e 0d 00 dc | 08 eb 20 31 32 0d 00 e6 |mode....|.. 12...|
|00002f30| 05 3a 0d 00 f0 1f f4 20 | 44 65 63 6c 61 72 65 20 |.:..... |Declare |
|00002f40| 67 6c 6f 62 61 6c 20 76 | 61 72 69 61 62 6c 65 73 |global v|ariables|
|00002f50| 2e 0d 00 fa 16 78 63 65 | 6e 74 72 65 25 20 20 20 |.....xce|ntre% |
|00002f60| 20 3d 20 20 36 34 30 0d | 01 04 16 79 63 65 6e 74 | = 640.|...ycent|
|00002f70| 72 65 25 20 20 20 20 3d | 20 20 35 31 32 0d 01 0e |re% =| 512...|
|00002f80| 18 61 6e 67 6c 65 20 20 | 20 20 20 20 20 3d 20 20 |.angle | = |
|00002f90| 33 2a af 2f 38 0d 01 18 | 16 73 73 69 7a 65 25 20 |3*./8...|.ssize% |
|00002fa0| 20 20 20 20 20 3d 20 20 | 35 31 32 0d 01 22 19 73 | = |512..".s|
|00002fb0| 6e 61 6d 65 24 20 20 20 | 20 20 20 3d 20 22 67 6c |name$ | = "gl|
|00002fc0| 6f 62 65 22 0d 01 2c 34 | 66 69 6c 65 6e 61 6d 65 |obe"..,4|filename|
|00002fd0| 24 20 20 20 3d 20 22 3c | 53 79 73 46 58 24 44 69 |$ = "<|SysFX$Di|
|00002fe0| 72 3e 2e 4d 79 53 70 72 | 69 74 65 73 2e 53 70 72 |r>.MySpr|ites.Spr|
|00002ff0| 69 74 65 46 69 6c 65 22 | 0d 01 36 05 3a 0d 01 40 |iteFile"|..6.:..@|
|00003000| 05 3a 0d 01 4a 05 3a 0d | 01 54 05 3a 0d 03 e8 13 |.:..J.:.|.T.:....|
|00003010| f4 20 43 6f 72 65 20 53 | 65 63 74 69 6f 6e 2e 0d |. Core S|ection..|
|00003020| 03 f2 05 3a 0d 03 fc 09 | 2a 53 4e 45 57 0d 04 06 |...:....|*SNEW...|
|00003030| 40 f2 64 72 61 77 67 6c | 6f 62 65 28 78 63 65 6e |@.drawgl|obe(xcen|
|00003040| 74 72 65 25 2d 73 73 69 | 7a 65 25 2f 32 2c 79 63 |tre%-ssi|ze%/2,yc|
|00003050| 65 6e 74 72 65 25 2d 73 | 73 69 7a 65 25 2f 32 2c |entre%-s|size%/2,|
|00003060| 61 6e 67 6c 65 2c 73 73 | 69 7a 65 25 29 0d 04 10 |angle,ss|ize%)...|
|00003070| 41 f2 67 65 74 73 70 72 | 69 74 65 28 73 6e 61 6d |A.getspr|ite(snam|
|00003080| 65 24 2c 78 63 65 6e 74 | 72 65 25 2d 73 73 69 7a |e$,xcent|re%-ssiz|
|00003090| 65 25 2f 32 2c 79 63 65 | 6e 74 72 65 25 2d 73 73 |e%/2,yce|ntre%-ss|
|000030a0| 69 7a 65 25 2f 32 2c 73 | 73 69 7a 65 25 29 0d 04 |ize%/2,s|size%)..|
|000030b0| 1a 1a f2 73 61 76 65 73 | 70 72 69 74 65 28 66 69 |...saves|prite(fi|
|000030c0| 6c 65 6e 61 6d 65 24 29 | 0d 04 24 05 db 0d 04 2e |lename$)|..$.....|
|000030d0| 05 da 0d 04 38 1a f2 6c | 6f 61 64 73 70 72 69 74 |....8..l|oadsprit|
|000030e0| 65 28 66 69 6c 65 6e 61 | 6d 65 24 29 0d 04 42 42 |e(filena|me$)..BB|
|000030f0| f2 70 75 74 73 70 72 69 | 74 65 28 78 63 65 6e 74 |.putspri|te(xcent|
|00003100| 72 65 25 2d 33 2a 73 73 | 69 7a 65 25 2f 34 2c 79 |re%-3*ss|ize%/4,y|
|00003110| 63 65 6e 74 72 65 25 2d | 33 2a 73 73 69 7a 65 25 |centre%-|3*ssize%|
|00003120| 2f 34 2c 33 2a 73 73 69 | 7a 65 25 2f 34 29 0d 04 |/4,3*ssi|ze%/4)..|
|00003130| 4c 05 e0 0d 04 56 05 3a | 0d 04 60 05 3a 0d 27 10 |L....V.:|..`.:.'.|
|00003140| 0c dd 20 f2 65 72 72 6f | 72 0d 27 1a 17 f4 20 52 |.. .erro|r.'... R|
|00003150| 65 70 6f 72 74 73 20 61 | 6e 20 65 72 72 6f 72 2e |eports a|n error.|
|00003160| 0d 27 24 05 3a 0d 27 2e | 05 3a 0d 27 38 05 3a 0d |.'$.:.'.|.:.'8.:.|
|00003170| 27 42 05 f6 0d 27 4c 13 | f1 20 22 20 61 74 20 6c |'B...'L.|. " at l|
|00003180| 69 6e 65 20 22 3b 9e 0d | 27 56 05 e0 0d 27 60 05 |ine ";..|'V...'`.|
|00003190| 3a 0d 27 6a 05 3a 0d 27 | 74 2c dd 20 f2 64 72 61 |:.'j.:.'|t,. .dra|
|000031a0| 77 67 6c 6f 62 65 28 6c | 65 66 74 25 2c 62 6f 74 |wglobe(l|eft%,bot|
|000031b0| 74 6f 6d 25 2c 61 6e 67 | 6c 65 31 2c 73 69 7a 65 |tom%,ang|le1,size|
|000031c0| 25 29 0d 27 7e 2b f4 20 | 44 72 61 77 73 20 61 20 |%).'~+. |Draws a |
|000031d0| 67 6c 6f 62 65 20 74 6f | 20 62 65 20 75 73 65 64 |globe to| be used|
|000031e0| 20 61 73 20 61 20 73 70 | 72 69 74 65 2e 0d 27 88 | as a sp|rite..'.|
|000031f0| 19 ea 20 78 63 25 2c 79 | 63 25 2c 72 61 64 25 2c |.. xc%,y|c%,rad%,|
|00003200| 61 6e 67 6c 65 32 0d 27 | 92 05 3a 0d 27 9c 1b f4 |angle2.'|..:.'...|
|00003210| 20 49 6e 69 74 69 61 6c | 69 73 65 20 76 61 72 69 | Initial|ise vari|
|00003220| 61 62 6c 65 73 2e 0d 27 | a6 05 3a 0d 27 b0 05 3a |ables..'|..:.'..:|
|00003230| 0d 27 ba 05 3a 0d 27 c4 | 1d 78 63 25 20 20 20 20 |.'..:.'.|.xc% |
|00003240| 20 3d 20 6c 65 66 74 25 | 20 20 2b 73 69 7a 65 25 | = left%| +size%|
|00003250| 2f 32 0d 27 ce 1d 79 63 | 25 20 20 20 20 20 3d 20 |/2.'..yc|% = |
|00003260| 62 6f 74 74 6f 6d 25 2b | 73 69 7a 65 25 2f 32 0d |bottom%+|size%/2.|
|00003270| 27 d8 15 72 61 64 25 20 | 20 20 20 3d 20 73 69 7a |'..rad% | = siz|
|00003280| 65 25 2f 34 0d 27 e2 05 | 3a 0d 27 ec 18 61 6e 67 |e%/4.'..|:.'..ang|
|00003290| 6c 65 32 20 20 3d 20 61 | 6e 67 6c 65 31 2d af 2f |le2 = a|ngle1-./|
|000032a0| 32 0d 27 f6 05 3a 0d 28 | 00 16 f4 20 44 72 61 77 |2.'..:.(|... Draw|
|000032b0| 20 67 6c 6f 62 65 20 61 | 78 69 73 2e 0d 28 0a 07 | globe a|xis..(..|
|000032c0| e6 20 37 0d 28 14 29 c8 | 9d 20 c8 90 20 78 63 25 |. 7.(.).|. .. xc%|
|000032d0| 2c 79 63 25 2c 73 69 7a | 65 25 2f 32 2c 73 69 7a |,yc%,siz|e%/2,siz|
|000032e0| 65 25 2f 36 34 2c 61 6e | 67 6c 65 31 0d 28 1e 05 |e%/64,an|gle1.(..|
|000032f0| 3a 0d 28 28 1d f4 20 44 | 72 61 77 20 67 6c 6f 62 |:.((.. D|raw glob|
|00003300| 65 20 62 6f 74 74 6f 6d | 20 68 61 6c 66 2e 0d 28 |e bottom| half..(|
|00003310| 32 07 e6 20 34 0d 28 3c | 0d ec 20 78 63 25 2c 79 |2.. 4.(<|.. xc%,y|
|00003320| 63 25 0d 28 46 2f ec 20 | 20 20 20 20 78 63 25 2d |c%.(F/. | xc%-|
|00003330| 72 61 64 25 2a 9b 28 61 | 6e 67 6c 65 32 29 2c 79 |rad%*.(a|ngle2),y|
|00003340| 63 25 2d 72 61 64 25 2a | b5 28 61 6e 67 6c 65 32 |c%-rad%*|.(angle2|
|00003350| 29 0d 28 50 2f f0 20 26 | 42 35 2c 78 63 25 2b 72 |).(P/. &|B5,xc%+r|
|00003360| 61 64 25 2a 9b 28 61 6e | 67 6c 65 32 29 2c 79 63 |ad%*.(an|gle2),yc|
|00003370| 25 2b 72 61 64 25 2a b5 | 28 61 6e 67 6c 65 32 29 |%+rad%*.|(angle2)|
|00003380| 0d 28 5a 05 3a 0d 28 64 | 1b f4 20 44 72 61 77 20 |.(Z.:.(d|.. Draw |
|00003390| 73 61 74 65 6c 6c 69 74 | 65 20 6f 72 62 69 74 2e |satellit|e orbit.|
|000033a0| 0d 28 6e 07 e6 20 36 0d | 28 78 25 c8 9d 20 78 63 |.(n.. 6.|(x%.. xc|
|000033b0| 25 2c 79 63 25 2c 73 69 | 7a 65 25 2f 38 2c 73 69 |%,yc%,si|ze%/8,si|
|000033c0| 7a 65 25 2f 32 2c 61 6e | 67 6c 65 31 0d 28 82 05 |ze%/2,an|gle1.(..|
|000033d0| 3a 0d 28 8c 1a f4 20 44 | 72 61 77 20 67 6c 6f 62 |:.(... D|raw glob|
|000033e0| 65 20 74 6f 70 20 68 61 | 6c 66 2e 0d 28 96 07 e6 |e top ha|lf..(...|
|000033f0| 20 34 0d 28 a0 0d ec 20 | 78 63 25 2c 79 63 25 0d | 4.(... |xc%,yc%.|
|00003400| 28 aa 2f ec 20 20 20 20 | 20 78 63 25 2b 72 61 64 |(./. | xc%+rad|
|00003410| 25 2a 9b 28 61 6e 67 6c | 65 32 29 2c 79 63 25 2b |%*.(angl|e2),yc%+|
|00003420| 72 61 64 25 2a b5 28 61 | 6e 67 6c 65 32 29 0d 28 |rad%*.(a|ngle2).(|
|00003430| b4 2f f0 20 26 42 35 2c | 78 63 25 2d 72 61 64 25 |./. &B5,|xc%-rad%|
|00003440| 2a 9b 28 61 6e 67 6c 65 | 32 29 2c 79 63 25 2d 72 |*.(angle|2),yc%-r|
|00003450| 61 64 25 2a b5 28 61 6e | 67 6c 65 32 29 0d 28 be |ad%*.(an|gle2).(.|
|00003460| 05 3a 0d 28 c8 05 3a 0d | 28 d2 05 3a 0d 28 dc 05 |.:.(..:.|(..:.(..|
|00003470| 3a 0d 28 e6 05 3a 0d 28 | f0 05 e1 0d 28 fa 05 3a |:.(..:.(|....(..:|
|00003480| 0d 29 04 2b dd 20 f2 67 | 65 74 73 70 72 69 74 65 |.).+. .g|etsprite|
|00003490| 28 6e 61 6d 65 24 2c 6c | 65 66 74 25 2c 62 6f 74 |(name$,l|eft%,bot|
|000034a0| 74 6f 6d 25 2c 73 69 7a | 65 25 29 0d 29 0e 28 f4 |tom%,siz|e%).).(.|
|000034b0| 20 50 69 63 6b 20 20 75 | 70 20 61 20 73 70 72 69 | Pick u|p a spri|
|000034c0| 74 65 20 66 72 6f 6d 20 | 74 68 65 20 73 63 72 65 |te from |the scre|
|000034d0| 65 6e 2e 0d 29 18 28 f4 | 20 53 61 76 65 20 69 74 |en..).(.| Save it|
|000034e0| 20 69 6e 20 74 68 65 20 | 73 79 73 74 65 6d 20 73 | in the |system s|
|000034f0| 70 72 69 74 65 20 61 72 | 65 61 2e 0d 29 22 11 ea |prite ar|ea..)"..|
|00003500| 20 72 69 67 68 74 25 2c | 74 6f 70 25 0d 29 2c 05 | right%,|top%.),.|
|00003510| 3a 0d 29 36 1b f4 20 49 | 6e 69 74 69 61 6c 69 73 |:.)6.. I|nitialis|
|00003520| 65 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 29 40 05 |e variab|les..)@.|
|00003530| 3a 0d 29 4a 05 3a 0d 29 | 54 05 3a 0d 29 5e 1d 72 |:.)J.:.)|T.:.)^.r|
|00003540| 69 67 68 74 25 20 20 3d | 20 6c 65 66 74 25 20 20 |ight% =| left% |
|00003550| 2b 73 69 7a 65 25 2d 31 | 0d 29 68 1d 74 6f 70 25 |+size%-1|.)h.top%|
|00003560| 20 20 20 20 3d 20 62 6f | 74 74 6f 6d 25 2b 73 69 | = bo|ttom%+si|
|00003570| 7a 65 25 2d 31 0d 29 72 | 05 3a 0d 29 7c 14 ec 20 |ze%-1.)r|.:.)|.. |
|00003580| 6c 65 66 74 25 20 2c 62 | 6f 74 74 6f 6d 25 0d 29 |left% ,b|ottom%.)|
|00003590| 86 11 ec 20 72 69 67 68 | 74 25 2c 74 6f 70 25 0d |... righ|t%,top%.|
|000035a0| 29 90 05 3a 0d 29 9a 05 | 3a 0d 29 a4 14 ff 28 22 |)..:.)..|:.)...("|
|000035b0| 53 47 45 54 20 22 2b 6e | 61 6d 65 24 29 0d 29 ae |SGET "+n|ame$).).|
|000035c0| 05 3a 0d 29 b8 05 e1 0d | 29 c2 05 3a 0d 29 cc 18 |.:.)....|)..:.)..|
|000035d0| dd 20 f2 73 61 76 65 73 | 70 72 69 74 65 28 6e 61 |. .saves|prite(na|
|000035e0| 6d 65 24 29 0d 29 d6 24 | f4 20 53 61 76 65 73 20 |me$).).$|. Saves |
|000035f0| 74 68 65 20 73 70 72 69 | 74 65 20 61 72 65 61 20 |the spri|te area |
|00003600| 74 6f 20 64 69 73 63 2e | 0d 29 e0 05 3a 0d 29 ea |to disc.|.)..:.).|
|00003610| 15 ff 28 22 53 53 41 56 | 45 20 22 2b 6e 61 6d 65 |..("SSAV|E "+name|
|00003620| 24 29 0d 29 f4 05 3a 0d | 29 fe 05 3a 0d 2a 08 05 |$).)..:.|)..:.*..|
|00003630| 3a 0d 2a 12 05 3a 0d 2a | 1c 05 e1 0d 2a 26 05 3a |:.*..:.*|....*&.:|
|00003640| 0d 2a 30 18 dd 20 f2 6c | 6f 61 64 73 70 72 69 74 |.*0.. .l|oadsprit|
|00003650| 65 28 6e 61 6d 65 24 29 | 0d 2a 3a 24 f4 20 4c 6f |e(name$)|.*:$. Lo|
|00003660| 61 64 73 20 61 20 73 70 | 72 69 74 65 20 66 69 6c |ads a sp|rite fil|
|00003670| 65 20 66 72 6f 6d 20 64 | 69 73 63 2e 0d 2a 44 05 |e from d|isc..*D.|
|00003680| 3a 0d 2a 4e 15 ff 28 22 | 53 4c 4f 41 44 20 22 2b |:.*N..("|SLOAD "+|
|00003690| 6e 61 6d 65 24 29 0d 2a | 58 05 3a 0d 2a 62 05 3a |name$).*|X.:.*b.:|
|000036a0| 0d 2a 6c 05 3a 0d 2a 76 | 05 3a 0d 2a 80 05 e1 0d |.*l.:.*v|.:.*....|
|000036b0| 2a 8a 05 3a 0d 2a 94 25 | dd 20 f2 70 75 74 73 70 |*..:.*.%|. .putsp|
|000036c0| 72 69 74 65 28 6c 65 66 | 74 25 2c 62 6f 74 74 6f |rite(lef|t%,botto|
|000036d0| 6d 25 2c 73 74 65 70 25 | 29 0d 2a 9e 22 f4 20 50 |m%,step%|).*.". P|
|000036e0| 6c 6f 74 73 20 61 20 73 | 70 72 69 74 65 20 74 6f |lots a s|prite to|
|000036f0| 20 74 68 65 20 73 63 72 | 65 65 6e 0d 2a a8 23 f4 | the scr|een.*.#.|
|00003700| 20 20 66 72 6f 6d 20 74 | 68 65 20 73 79 73 74 65 | from t|he syste|
|00003710| 6d 20 73 70 72 69 74 65 | 20 61 72 65 61 2e 0d 2a |m sprite| area..*|
|00003720| b2 05 ea 0d 2a bc 05 3a | 0d 2a c6 1b f4 20 49 6e |....*..:|.*... In|
|00003730| 69 74 69 61 6c 69 73 65 | 20 76 61 72 69 61 62 6c |itialise| variabl|
|00003740| 65 73 2e 0d 2a d0 05 3a | 0d 2a da 05 3a 0d 2a e4 |es..*..:|.*..:.*.|
|00003750| 05 3a 0d 2a ee 05 3a 0d | 2a f8 05 3a 0d 2b 02 18 |.:.*..:.|*..:.+..|
|00003760| f4 20 43 68 6f 6f 73 65 | 20 74 68 65 20 73 70 72 |. Choose| the spr|
|00003770| 69 74 65 2e 0d 2b 0c 12 | 2a 53 43 48 4f 4f 53 45 |ite..+..|*SCHOOSE|
|00003780| 20 67 6c 6f 62 65 0d 2b | 16 05 3a 0d 2b 20 11 f4 | globe.+|..:.+ ..|
|00003790| 20 55 73 65 20 61 20 6d | 61 73 6b 2e 0d 2b 2a 09 | Use a m|ask..+*.|
|000037a0| e6 20 38 2c 30 0d 2b 34 | 05 3a 0d 2b 3e 21 f4 20 |. 8,0.+4|.:.+>!. |
|000037b0| 50 6c 6f 74 20 74 68 65 | 20 73 70 72 69 74 65 20 |Plot the| sprite |
|000037c0| 66 6f 75 72 20 74 69 6d | 65 73 2e 0d 2b 48 1d f0 |four tim|es..+H..|
|000037d0| 20 26 45 44 2c 6c 65 66 | 74 25 20 20 20 20 20 20 | &ED,lef|t% |
|000037e0| 2c 62 6f 74 74 6f 6d 25 | 0d 2b 52 1d f0 20 26 45 |,bottom%|.+R.. &E|
|000037f0| 44 2c 6c 65 66 74 25 2b | 73 74 65 70 25 2c 62 6f |D,left%+|step%,bo|
|00003800| 74 74 6f 6d 25 0d 2b 5c | 23 f0 20 26 45 44 2c 6c |ttom%.+\|#. &ED,l|
|00003810| 65 66 74 25 2b 73 74 65 | 70 25 2c 62 6f 74 74 6f |eft%+ste|p%,botto|
|00003820| 6d 25 2b 73 74 65 70 25 | 0d 2b 66 23 f0 20 26 45 |m%+step%|.+f#. &E|
|00003830| 44 2c 6c 65 66 74 25 20 | 20 20 20 20 20 2c 62 6f |D,left% | ,bo|
|00003840| 74 74 6f 6d 25 2b 73 74 | 65 70 25 0d 2b 70 05 3a |ttom%+st|ep%.+p.:|
|00003850| 0d 2b 7a 05 3a 0d 2b 84 | 05 3a 0d 2b 8e 05 3a 0d |.+z.:.+.|.:.+..:.|
|00003860| 2b 98 05 e1 0d 2b a2 05 | 3a 0d 2b ac 05 3a 0d 2b |+....+..|:.+..:.+|
|00003870| b6 05 3a 0d ff 46 69 6c | 65 44 61 74 61 82 53 79 |..:..Fil|eData.Sy|
|00003880| 73 46 58 30 32 31 00 00 | 00 d5 09 00 00 41 fb ff |sFX021..|.....A..|
|00003890| ff 30 4a ff 8c 03 00 cd | 4e 0d 00 64 27 f4 20 3e |.0J.....|N..d'. >|
|000038a0| 20 3c 53 79 73 46 58 24 | 44 69 72 3e 2e 42 61 73 | <SysFX$|Dir>.Bas|
|000038b0| 69 63 50 72 6f 67 73 2e | 53 79 73 46 58 30 32 31 |icProgs.|SysFX021|
|000038c0| 0d 00 6e 1f f4 20 41 75 | 74 68 6f 72 20 20 20 20 |..n.. Au|thor |
|000038d0| 20 20 20 3a 20 47 20 4c | 20 46 69 74 74 6f 6e 0d | : G L| Fitton.|
|000038e0| 00 78 24 f4 20 43 6f 70 | 79 72 69 67 68 74 20 20 |.x$. Cop|yright |
|000038f0| 20 20 3a 20 41 42 41 43 | 55 53 20 54 52 41 49 4e | : ABAC|US TRAIN|
|00003900| 49 4e 47 0d 00 82 24 f4 | 20 56 65 72 73 69 6f 6e |ING...$.| Version|
|00003910| 20 30 2e 30 30 20 3a 20 | 32 30 74 68 20 4d 61 72 | 0.00 : |20th Mar|
|00003920| 63 68 20 31 39 38 39 0d | 00 8c 05 3a 0d 00 96 22 |ch 1989.|...:..."|
|00003930| f4 20 44 65 6d 6f 6e 73 | 74 72 61 74 65 73 20 53 |. Demons|trates S|
|00003940| 79 73 74 65 6d 20 53 70 | 72 69 74 65 73 2e 0d 00 |ystem Sp|rites...|
|00003950| a0 05 3a 0d 00 aa 16 f4 | 20 50 72 65 43 6f 72 65 |..:.....| PreCore|
|00003960| 20 53 65 63 74 69 6f 6e | 2e 0d 00 b4 18 f4 20 53 | Section|...... S|
|00003970| 65 74 20 75 70 20 65 72 | 72 6f 72 20 74 72 61 70 |et up er|ror trap|
|00003980| 2e 0d 00 be 0e ee 20 85 | 20 f2 65 72 72 6f 72 0d |...... .| .error.|
|00003990| 00 c8 05 3a 0d 00 d2 16 | f4 20 43 68 6f 6f 73 65 |...:....|. Choose|
|000039a0| 20 74 68 65 20 6d 6f 64 | 65 2e 0d 00 dc 08 eb 20 | the mod|e...... |
|000039b0| 31 32 0d 00 e6 05 3a 0d | 00 f0 1f f4 20 44 65 63 |12....:.|.... Dec|
|000039c0| 6c 61 72 65 20 67 6c 6f | 62 61 6c 20 76 61 72 69 |lare glo|bal vari|
|000039d0| 61 62 6c 65 73 2e 0d 00 | fa 16 78 63 65 6e 74 72 |ables...|..xcentr|
|000039e0| 65 25 20 20 20 20 3d 20 | 20 36 34 30 0d 01 04 16 |e% = | 640....|
|000039f0| 79 63 65 6e 74 72 65 25 | 20 20 20 20 3d 20 20 35 |ycentre%| = 5|
|00003a00| 31 32 0d 01 0e 18 61 6e | 67 6c 65 20 20 20 20 20 |12....an|gle |
|00003a10| 20 20 3d 20 20 33 2a af | 2f 38 0d 01 18 16 73 73 | = 3*.|/8....ss|
|00003a20| 69 7a 65 25 20 20 20 20 | 20 20 3d 20 20 35 31 32 |ize% | = 512|
|00003a30| 0d 01 22 19 73 6e 61 6d | 65 24 20 20 20 20 20 20 |..".snam|e$ |
|00003a40| 3d 20 22 67 6c 6f 62 65 | 22 0d 01 2c 34 66 69 6c |= "globe|"..,4fil|
|00003a50| 65 6e 61 6d 65 24 20 20 | 20 3d 20 22 3c 53 79 73 |ename$ | = "<Sys|
|00003a60| 46 58 24 44 69 72 3e 2e | 4d 79 53 70 72 69 74 65 |FX$Dir>.|MySprite|
|00003a70| 73 2e 53 70 72 69 74 65 | 46 69 6c 65 22 0d 01 36 |s.Sprite|File"..6|
|00003a80| 05 3a 0d 01 40 05 3a 0d | 01 4a 05 3a 0d 01 54 05 |.:..@.:.|.J.:..T.|
|00003a90| 3a 0d 03 e8 13 f4 20 43 | 6f 72 65 20 53 65 63 74 |:..... C|ore Sect|
|00003aa0| 69 6f 6e 2e 0d 03 f2 05 | 3a 0d 03 fc 09 2a 53 4e |ion.....|:....*SN|
|00003ab0| 45 57 0d 04 06 05 3a 0d | 04 10 05 3a 0d 04 1a 05 |EW....:.|...:....|
|00003ac0| 3a 0d 04 24 05 3a 0d 04 | 2e 05 3a 0d 04 38 1a f2 |:..$.:..|..:..8..|
|00003ad0| 6c 6f 61 64 73 70 72 69 | 74 65 28 66 69 6c 65 6e |loadspri|te(filen|
|00003ae0| 61 6d 65 24 29 0d 04 42 | 42 f2 70 75 74 73 70 72 |ame$)..B|B.putspr|
|00003af0| 69 74 65 28 78 63 65 6e | 74 72 65 25 2d 33 2a 73 |ite(xcen|tre%-3*s|
|00003b00| 73 69 7a 65 25 2f 34 2c | 79 63 65 6e 74 72 65 25 |size%/4,|ycentre%|
|00003b10| 2d 33 2a 73 73 69 7a 65 | 25 2f 34 2c 33 2a 73 73 |-3*ssize|%/4,3*ss|
|00003b20| 69 7a 65 25 2f 34 29 0d | 04 4c 05 e0 0d 04 56 05 |ize%/4).|.L....V.|
|00003b30| 3a 0d 04 60 05 3a 0d 27 | 10 0c dd 20 f2 65 72 72 |:..`.:.'|... .err|
|00003b40| 6f 72 0d 27 1a 17 f4 20 | 52 65 70 6f 72 74 73 20 |or.'... |Reports |
|00003b50| 61 6e 20 65 72 72 6f 72 | 2e 0d 27 24 05 3a 0d 27 |an error|..'$.:.'|
|00003b60| 2e 05 3a 0d 27 38 05 3a | 0d 27 42 05 f6 0d 27 4c |..:.'8.:|.'B...'L|
|00003b70| 13 f1 20 22 20 61 74 20 | 6c 69 6e 65 20 22 3b 9e |.. " at |line ";.|
|00003b80| 0d 27 56 05 e0 0d 27 60 | 05 3a 0d 27 6a 05 3a 0d |.'V...'`|.:.'j.:.|
|00003b90| 27 74 2c dd 20 f2 64 72 | 61 77 67 6c 6f 62 65 28 |'t,. .dr|awglobe(|
|00003ba0| 6c 65 66 74 25 2c 62 6f | 74 74 6f 6d 25 2c 61 6e |left%,bo|ttom%,an|
|00003bb0| 67 6c 65 31 2c 73 69 7a | 65 25 29 0d 27 7e 2b f4 |gle1,siz|e%).'~+.|
|00003bc0| 20 44 72 61 77 73 20 61 | 20 67 6c 6f 62 65 20 74 | Draws a| globe t|
|00003bd0| 6f 20 62 65 20 75 73 65 | 64 20 61 73 20 61 20 73 |o be use|d as a s|
|00003be0| 70 72 69 74 65 2e 0d 27 | 88 19 ea 20 78 63 25 2c |prite..'|... xc%,|
|00003bf0| 79 63 25 2c 72 61 64 25 | 2c 61 6e 67 6c 65 32 0d |yc%,rad%|,angle2.|
|00003c00| 27 92 05 3a 0d 27 9c 1b | f4 20 49 6e 69 74 69 61 |'..:.'..|. Initia|
|00003c10| 6c 69 73 65 20 76 61 72 | 69 61 62 6c 65 73 2e 0d |lise var|iables..|
|00003c20| 27 a6 05 3a 0d 27 b0 05 | 3a 0d 27 ba 05 3a 0d 27 |'..:.'..|:.'..:.'|
|00003c30| c4 1d 78 63 25 20 20 20 | 20 20 3d 20 6c 65 66 74 |..xc% | = left|
|00003c40| 25 20 20 2b 73 69 7a 65 | 25 2f 32 0d 27 ce 1d 79 |% +size|%/2.'..y|
|00003c50| 63 25 20 20 20 20 20 3d | 20 62 6f 74 74 6f 6d 25 |c% =| bottom%|
|00003c60| 2b 73 69 7a 65 25 2f 32 | 0d 27 d8 15 72 61 64 25 |+size%/2|.'..rad%|
|00003c70| 20 20 20 20 3d 20 73 69 | 7a 65 25 2f 34 0d 27 e2 | = si|ze%/4.'.|
|00003c80| 05 3a 0d 27 ec 18 61 6e | 67 6c 65 32 20 20 3d 20 |.:.'..an|gle2 = |
|00003c90| 61 6e 67 6c 65 31 2d af | 2f 32 0d 27 f6 05 3a 0d |angle1-.|/2.'..:.|
|00003ca0| 28 00 16 f4 20 44 72 61 | 77 20 67 6c 6f 62 65 20 |(... Dra|w globe |
|00003cb0| 61 78 69 73 2e 0d 28 0a | 07 e6 20 37 0d 28 14 29 |axis..(.|.. 7.(.)|
|00003cc0| c8 9d 20 c8 90 20 78 63 | 25 2c 79 63 25 2c 73 69 |.. .. xc|%,yc%,si|
|00003cd0| 7a 65 25 2f 32 2c 73 69 | 7a 65 25 2f 36 34 2c 61 |ze%/2,si|ze%/64,a|
|00003ce0| 6e 67 6c 65 31 0d 28 1e | 05 3a 0d 28 28 1d f4 20 |ngle1.(.|.:.((.. |
|00003cf0| 44 72 61 77 20 67 6c 6f | 62 65 20 62 6f 74 74 6f |Draw glo|be botto|
|00003d00| 6d 20 68 61 6c 66 2e 0d | 28 32 07 e6 20 34 0d 28 |m half..|(2.. 4.(|
|00003d10| 3c 0d ec 20 78 63 25 2c | 79 63 25 0d 28 46 2f ec |<.. xc%,|yc%.(F/.|
|00003d20| 20 20 20 20 20 78 63 25 | 2d 72 61 64 25 2a 9b 28 | xc%|-rad%*.(|
|00003d30| 61 6e 67 6c 65 32 29 2c | 79 63 25 2d 72 61 64 25 |angle2),|yc%-rad%|
|00003d40| 2a b5 28 61 6e 67 6c 65 | 32 29 0d 28 50 2f f0 20 |*.(angle|2).(P/. |
|00003d50| 26 42 35 2c 78 63 25 2b | 72 61 64 25 2a 9b 28 61 |&B5,xc%+|rad%*.(a|
|00003d60| 6e 67 6c 65 32 29 2c 79 | 63 25 2b 72 61 64 25 2a |ngle2),y|c%+rad%*|
|00003d70| b5 28 61 6e 67 6c 65 32 | 29 0d 28 5a 05 3a 0d 28 |.(angle2|).(Z.:.(|
|00003d80| 64 1b f4 20 44 72 61 77 | 20 73 61 74 65 6c 6c 69 |d.. Draw| satelli|
|00003d90| 74 65 20 6f 72 62 69 74 | 2e 0d 28 6e 07 e6 20 36 |te orbit|..(n.. 6|
|00003da0| 0d 28 78 25 c8 9d 20 78 | 63 25 2c 79 63 25 2c 73 |.(x%.. x|c%,yc%,s|
|00003db0| 69 7a 65 25 2f 38 2c 73 | 69 7a 65 25 2f 32 2c 61 |ize%/8,s|ize%/2,a|
|00003dc0| 6e 67 6c 65 31 0d 28 82 | 05 3a 0d 28 8c 1a f4 20 |ngle1.(.|.:.(... |
|00003dd0| 44 72 61 77 20 67 6c 6f | 62 65 20 74 6f 70 20 68 |Draw glo|be top h|
|00003de0| 61 6c 66 2e 0d 28 96 07 | e6 20 34 0d 28 a0 0d ec |alf..(..|. 4.(...|
|00003df0| 20 78 63 25 2c 79 63 25 | 0d 28 aa 2f ec 20 20 20 | xc%,yc%|.(./. |
|00003e00| 20 20 78 63 25 2b 72 61 | 64 25 2a 9b 28 61 6e 67 | xc%+ra|d%*.(ang|
|00003e10| 6c 65 32 29 2c 79 63 25 | 2b 72 61 64 25 2a b5 28 |le2),yc%|+rad%*.(|
|00003e20| 61 6e 67 6c 65 32 29 0d | 28 b4 2f f0 20 26 42 35 |angle2).|(./. &B5|
|00003e30| 2c 78 63 25 2d 72 61 64 | 25 2a 9b 28 61 6e 67 6c |,xc%-rad|%*.(angl|
|00003e40| 65 32 29 2c 79 63 25 2d | 72 61 64 25 2a b5 28 61 |e2),yc%-|rad%*.(a|
|00003e50| 6e 67 6c 65 32 29 0d 28 | be 05 3a 0d 28 c8 05 3a |ngle2).(|..:.(..:|
|00003e60| 0d 28 d2 05 3a 0d 28 dc | 05 3a 0d 28 e6 05 3a 0d |.(..:.(.|.:.(..:.|
|00003e70| 28 f0 05 e1 0d 28 fa 05 | 3a 0d 29 04 2b dd 20 f2 |(....(..|:.).+. .|
|00003e80| 67 65 74 73 70 72 69 74 | 65 28 6e 61 6d 65 24 2c |getsprit|e(name$,|
|00003e90| 6c 65 66 74 25 2c 62 6f | 74 74 6f 6d 25 2c 73 69 |left%,bo|ttom%,si|
|00003ea0| 7a 65 25 29 0d 29 0e 28 | f4 20 50 69 63 6b 20 20 |ze%).).(|. Pick |
|00003eb0| 75 70 20 61 20 73 70 72 | 69 74 65 20 66 72 6f 6d |up a spr|ite from|
|00003ec0| 20 74 68 65 20 73 63 72 | 65 65 6e 2e 0d 29 18 28 | the scr|een..).(|
|00003ed0| f4 20 53 61 76 65 20 69 | 74 20 69 6e 20 74 68 65 |. Save i|t in the|
|00003ee0| 20 73 79 73 74 65 6d 20 | 73 70 72 69 74 65 20 61 | system |sprite a|
|00003ef0| 72 65 61 2e 0d 29 22 11 | ea 20 72 69 67 68 74 25 |rea..)".|. right%|
|00003f00| 2c 74 6f 70 25 0d 29 2c | 05 3a 0d 29 36 1b f4 20 |,top%.),|.:.)6.. |
|00003f10| 49 6e 69 74 69 61 6c 69 | 73 65 20 76 61 72 69 61 |Initiali|se varia|
|00003f20| 62 6c 65 73 2e 0d 29 40 | 05 3a 0d 29 4a 05 3a 0d |bles..)@|.:.)J.:.|
|00003f30| 29 54 05 3a 0d 29 5e 1d | 72 69 67 68 74 25 20 20 |)T.:.)^.|right% |
|00003f40| 3d 20 6c 65 66 74 25 20 | 20 2b 73 69 7a 65 25 2d |= left% | +size%-|
|00003f50| 31 0d 29 68 1d 74 6f 70 | 25 20 20 20 20 3d 20 62 |1.)h.top|% = b|
|00003f60| 6f 74 74 6f 6d 25 2b 73 | 69 7a 65 25 2d 31 0d 29 |ottom%+s|ize%-1.)|
|00003f70| 72 05 3a 0d 29 7c 14 ec | 20 6c 65 66 74 25 20 2c |r.:.)|..| left% ,|
|00003f80| 62 6f 74 74 6f 6d 25 0d | 29 86 11 ec 20 72 69 67 |bottom%.|)... rig|
|00003f90| 68 74 25 2c 74 6f 70 25 | 0d 29 90 05 3a 0d 29 9a |ht%,top%|.)..:.).|
|00003fa0| 05 3a 0d 29 a4 14 ff 28 | 22 53 47 45 54 20 22 2b |.:.)...(|"SGET "+|
|00003fb0| 6e 61 6d 65 24 29 0d 29 | ae 05 3a 0d 29 b8 05 e1 |name$).)|..:.)...|
|00003fc0| 0d 29 c2 05 3a 0d 29 cc | 18 dd 20 f2 73 61 76 65 |.)..:.).|.. .save|
|00003fd0| 73 70 72 69 74 65 28 6e | 61 6d 65 24 29 0d 29 d6 |sprite(n|ame$).).|
|00003fe0| 24 f4 20 53 61 76 65 73 | 20 74 68 65 20 73 70 72 |$. Saves| the spr|
|00003ff0| 69 74 65 20 61 72 65 61 | 20 74 6f 20 64 69 73 63 |ite area| to disc|
|00004000| 2e 0d 29 e0 05 3a 0d 29 | ea 15 ff 28 22 53 53 41 |..)..:.)|...("SSA|
|00004010| 56 45 20 22 2b 6e 61 6d | 65 24 29 0d 29 f4 05 3a |VE "+nam|e$).)..:|
|00004020| 0d 29 fe 05 3a 0d 2a 08 | 05 3a 0d 2a 12 05 3a 0d |.)..:.*.|.:.*..:.|
|00004030| 2a 1c 05 e1 0d 2a 26 05 | 3a 0d 2a 30 18 dd 20 f2 |*....*&.|:.*0.. .|
|00004040| 6c 6f 61 64 73 70 72 69 | 74 65 28 6e 61 6d 65 24 |loadspri|te(name$|
|00004050| 29 0d 2a 3a 24 f4 20 4c | 6f 61 64 73 20 61 20 73 |).*:$. L|oads a s|
|00004060| 70 72 69 74 65 20 66 69 | 6c 65 20 66 72 6f 6d 20 |prite fi|le from |
|00004070| 64 69 73 63 2e 0d 2a 44 | 05 3a 0d 2a 4e 15 ff 28 |disc..*D|.:.*N..(|
|00004080| 22 53 4c 4f 41 44 20 22 | 2b 6e 61 6d 65 24 29 0d |"SLOAD "|+name$).|
|00004090| 2a 58 05 3a 0d 2a 62 05 | 3a 0d 2a 6c 05 3a 0d 2a |*X.:.*b.|:.*l.:.*|
|000040a0| 76 05 3a 0d 2a 80 05 e1 | 0d 2a 8a 05 3a 0d 2a 94 |v.:.*...|.*..:.*.|
|000040b0| 25 dd 20 f2 70 75 74 73 | 70 72 69 74 65 28 6c 65 |%. .puts|prite(le|
|000040c0| 66 74 25 2c 62 6f 74 74 | 6f 6d 25 2c 73 74 65 70 |ft%,bott|om%,step|
|000040d0| 25 29 0d 2a 9e 22 f4 20 | 50 6c 6f 74 73 20 61 20 |%).*.". |Plots a |
|000040e0| 73 70 72 69 74 65 20 74 | 6f 20 74 68 65 20 73 63 |sprite t|o the sc|
|000040f0| 72 65 65 6e 0d 2a a8 23 | f4 20 20 66 72 6f 6d 20 |reen.*.#|. from |
|00004100| 74 68 65 20 73 79 73 74 | 65 6d 20 73 70 72 69 74 |the syst|em sprit|
|00004110| 65 20 61 72 65 61 2e 0d | 2a b2 05 ea 0d 2a bc 05 |e area..|*....*..|
|00004120| 3a 0d 2a c6 1b f4 20 49 | 6e 69 74 69 61 6c 69 73 |:.*... I|nitialis|
|00004130| 65 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 2a d0 05 |e variab|les..*..|
|00004140| 3a 0d 2a da 05 3a 0d 2a | e4 05 3a 0d 2a ee 05 3a |:.*..:.*|..:.*..:|
|00004150| 0d 2a f8 05 3a 0d 2b 02 | 18 f4 20 43 68 6f 6f 73 |.*..:.+.|.. Choos|
|00004160| 65 20 74 68 65 20 73 70 | 72 69 74 65 2e 0d 2b 0c |e the sp|rite..+.|
|00004170| 12 2a 53 43 48 4f 4f 53 | 45 20 67 6c 6f 62 65 0d |.*SCHOOS|E globe.|
|00004180| 2b 16 05 3a 0d 2b 20 11 | f4 20 55 73 65 20 61 20 |+..:.+ .|. Use a |
|00004190| 6d 61 73 6b 2e 0d 2b 2a | 09 e6 20 38 2c 30 0d 2b |mask..+*|.. 8,0.+|
|000041a0| 34 05 3a 0d 2b 3e 21 f4 | 20 50 6c 6f 74 20 74 68 |4.:.+>!.| Plot th|
|000041b0| 65 20 73 70 72 69 74 65 | 20 66 6f 75 72 20 74 69 |e sprite| four ti|
|000041c0| 6d 65 73 2e 0d 2b 48 1d | f0 20 26 45 44 2c 6c 65 |mes..+H.|. &ED,le|
|000041d0| 66 74 25 20 20 20 20 20 | 20 2c 62 6f 74 74 6f 6d |ft% | ,bottom|
|000041e0| 25 0d 2b 52 1d f0 20 26 | 45 44 2c 6c 65 66 74 25 |%.+R.. &|ED,left%|
|000041f0| 2b 73 74 65 70 25 2c 62 | 6f 74 74 6f 6d 25 0d 2b |+step%,b|ottom%.+|
|00004200| 5c 23 f0 20 26 45 44 2c | 6c 65 66 74 25 2b 73 74 |\#. &ED,|left%+st|
|00004210| 65 70 25 2c 62 6f 74 74 | 6f 6d 25 2b 73 74 65 70 |ep%,bott|om%+step|
|00004220| 25 0d 2b 66 23 f0 20 26 | 45 44 2c 6c 65 66 74 25 |%.+f#. &|ED,left%|
|00004230| 20 20 20 20 20 20 2c 62 | 6f 74 74 6f 6d 25 2b 73 | ,b|ottom%+s|
|00004240| 74 65 70 25 0d 2b 70 05 | 3a 0d 2b 7a 05 3a 0d 2b |tep%.+p.|:.+z.:.+|
|00004250| 84 05 3a 0d 2b 8e 05 3a | 0d 2b 98 05 e1 0d 2b a2 |..:.+..:|.+....+.|
|00004260| 05 3a 0d 2b ac 05 3a 0d | 2b b6 05 3a 0d ff 46 69 |.:.+..:.|+..:..Fi|
|00004270| 6c 65 44 61 74 61 82 53 | 79 73 46 58 30 33 30 00 |leData.S|ysFX030.|
|00004280| 00 00 b6 0b 00 00 41 fb | ff ff 65 57 ff 8c 03 00 |......A.|..eW....|
|00004290| 3b bc 0d 00 64 27 f4 20 | 3e 20 3c 53 79 73 46 58 |;...d'. |> <SysFX|
|000042a0| 24 44 69 72 3e 2e 42 61 | 73 69 63 50 72 6f 67 73 |$Dir>.Ba|sicProgs|
|000042b0| 2e 53 79 73 46 58 30 33 | 30 0d 00 6e 1f f4 20 41 |.SysFX03|0..n.. A|
|000042c0| 75 74 68 6f 72 20 20 20 | 20 20 20 20 3a 20 47 20 |uthor | : G |
|000042d0| 4c 20 46 69 74 74 6f 6e | 0d 00 78 24 f4 20 43 6f |L Fitton|..x$. Co|
|000042e0| 70 79 72 69 67 68 74 20 | 20 20 20 3a 20 41 42 41 |pyright | : ABA|
|000042f0| 43 55 53 20 54 52 41 49 | 4e 49 4e 47 0d 00 82 24 |CUS TRAI|NING...$|
|00004300| f4 20 56 65 72 73 69 6f | 6e 20 30 2e 30 30 20 3a |. Versio|n 0.00 :|
|00004310| 20 32 30 74 68 20 4d 61 | 72 63 68 20 31 39 38 39 | 20th Ma|rch 1989|
|00004320| 0d 00 8c 05 3a 0d 00 96 | 22 f4 20 44 65 6d 6f 6e |....:...|". Demon|
|00004330| 73 74 72 61 74 65 73 20 | 53 79 73 74 65 6d 20 53 |strates |System S|
|00004340| 70 72 69 74 65 73 2e 0d | 00 a0 05 3a 0d 00 aa 16 |prites..|...:....|
|00004350| f4 20 50 72 65 43 6f 72 | 65 20 53 65 63 74 69 6f |. PreCor|e Sectio|
|00004360| 6e 2e 0d 00 b4 18 f4 20 | 53 65 74 20 75 70 20 65 |n...... |Set up e|
|00004370| 72 72 6f 72 20 74 72 61 | 70 2e 0d 00 be 0e ee 20 |rror tra|p...... |
|00004380| 85 20 f2 65 72 72 6f 72 | 0d 00 c8 05 3a 0d 00 d2 |. .error|....:...|
|00004390| 16 f4 20 43 68 6f 6f 73 | 65 20 74 68 65 20 6d 6f |.. Choos|e the mo|
|000043a0| 64 65 2e 0d 00 dc 08 eb | 20 31 32 0d 00 e6 05 3a |de......| 12....:|
|000043b0| 0d 00 f0 1f f4 20 44 65 | 63 6c 61 72 65 20 67 6c |..... De|clare gl|
|000043c0| 6f 62 61 6c 20 76 61 72 | 69 61 62 6c 65 73 2e 0d |obal var|iables..|
|000043d0| 00 fa 16 78 63 65 6e 74 | 72 65 25 20 20 20 20 3d |...xcent|re% =|
|000043e0| 20 20 36 34 30 0d 01 04 | 16 79 63 65 6e 74 72 65 | 640...|.ycentre|
|000043f0| 25 20 20 20 20 3d 20 20 | 35 31 32 0d 01 0e 18 61 |% = |512....a|
|00004400| 6e 67 6c 65 20 20 20 20 | 20 20 20 3d 20 20 33 2a |ngle | = 3*|
|00004410| af 2f 38 0d 01 18 16 73 | 73 69 7a 65 25 20 20 20 |./8....s|size% |
|00004420| 20 20 20 3d 20 20 35 31 | 32 0d 01 22 05 3a 0d 01 | = 51|2..".:..|
|00004430| 2c 10 de 20 73 6e 61 6d | 65 25 20 26 32 30 0d 01 |,.. snam|e% &20..|
|00004440| 36 10 de 20 66 6e 61 6d | 65 25 20 26 32 30 0d 01 |6.. fnam|e% &20..|
|00004450| 40 05 3a 0d 01 4a 19 24 | 73 6e 61 6d 65 25 20 20 |@.:..J.$|sname% |
|00004460| 20 20 20 3d 20 22 67 6c | 6f 62 65 22 0d 01 54 34 | = "gl|obe"..T4|
|00004470| 24 66 6e 61 6d 65 25 20 | 20 20 20 20 3d 20 22 3c |$fname% | = "<|
|00004480| 53 79 73 46 58 24 44 69 | 72 3e 2e 4d 79 53 70 72 |SysFX$Di|r>.MySpr|
|00004490| 69 74 65 73 2e 53 70 72 | 69 74 65 46 69 6c 65 22 |ites.Spr|iteFile"|
|000044a0| 0d 01 5e 05 3a 0d 01 68 | 27 f4 20 47 69 76 65 20 |..^.:..h|'. Give |
|000044b0| 76 61 72 69 61 62 6c 65 | 20 6e 61 6d 65 73 20 74 |variable| names t|
|000044c0| 6f 20 53 70 72 69 74 65 | 4f 70 73 2e 0d 01 72 15 |o Sprite|Ops...r.|
|000044d0| 6e 65 77 25 20 20 20 20 | 20 20 20 20 3d 20 20 20 |new% | = |
|000044e0| 39 0d 01 7c 05 3a 0d 01 | 86 05 3a 0d 01 90 05 3a |9..|.:..|..:....:|
|000044f0| 0d 03 e8 13 f4 20 43 6f | 72 65 20 53 65 63 74 69 |..... Co|re Secti|
|00004500| 6f 6e 2e 0d 03 f2 05 3a | 0d 03 fc 19 c8 99 20 22 |on.....:|...... "|
|00004510| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 6e 65 77 |OS_Sprit|eOp",new|
|00004520| 25 0d 04 06 40 f2 64 72 | 61 77 67 6c 6f 62 65 28 |%...@.dr|awglobe(|
|00004530| 78 63 65 6e 74 72 65 25 | 2d 73 73 69 7a 65 25 2f |xcentre%|-ssize%/|
|00004540| 32 2c 79 63 65 6e 74 72 | 65 25 2d 73 73 69 7a 65 |2,ycentr|e%-ssize|
|00004550| 25 2f 32 2c 61 6e 67 6c | 65 2c 73 73 69 7a 65 25 |%/2,angl|e,ssize%|
|00004560| 29 0d 04 10 41 f2 67 65 | 74 73 70 72 69 74 65 28 |)...A.ge|tsprite(|
|00004570| 73 6e 61 6d 65 25 2c 78 | 63 65 6e 74 72 65 25 2d |sname%,x|centre%-|
|00004580| 73 73 69 7a 65 25 2f 32 | 2c 79 63 65 6e 74 72 65 |ssize%/2|,ycentre|
|00004590| 25 2d 73 73 69 7a 65 25 | 2f 32 2c 73 73 69 7a 65 |%-ssize%|/2,ssize|
|000045a0| 25 29 0d 04 1a 17 f2 73 | 61 76 65 73 70 72 69 74 |%).....s|avesprit|
|000045b0| 65 28 66 6e 61 6d 65 25 | 29 0d 04 24 05 db 0d 04 |e(fname%|)..$....|
|000045c0| 2e 05 da 0d 04 38 17 f2 | 6c 6f 61 64 73 70 72 69 |.....8..|loadspri|
|000045d0| 74 65 28 66 6e 61 6d 65 | 25 29 0d 04 42 4a f2 70 |te(fname|%)..BJ.p|
|000045e0| 6c 6f 74 73 70 72 69 74 | 65 28 73 6e 61 6d 65 25 |lotsprit|e(sname%|
|000045f0| 2c 78 63 65 6e 74 72 65 | 25 2d 33 2a 73 73 69 7a |,xcentre|%-3*ssiz|
|00004600| 65 25 2f 34 2c 79 63 65 | 6e 74 72 65 25 2d 33 2a |e%/4,yce|ntre%-3*|
|00004610| 73 73 69 7a 65 25 2f 34 | 2c 33 2a 73 73 69 7a 65 |ssize%/4|,3*ssize|
|00004620| 25 2f 34 29 0d 04 4c 05 | e0 0d 04 56 05 3a 0d 04 |%/4)..L.|...V.:..|
|00004630| 60 05 3a 0d 27 10 0c dd | 20 f2 65 72 72 6f 72 0d |`.:.'...| .error.|
|00004640| 27 1a 17 f4 20 52 65 70 | 6f 72 74 73 20 61 6e 20 |'... Rep|orts an |
|00004650| 65 72 72 6f 72 2e 0d 27 | 24 05 3a 0d 27 2e 05 3a |error..'|$.:.'..:|
|00004660| 0d 27 38 05 3a 0d 27 42 | 05 f6 0d 27 4c 13 f1 20 |.'8.:.'B|...'L.. |
|00004670| 22 20 61 74 20 6c 69 6e | 65 20 22 3b 9e 0d 27 56 |" at lin|e ";..'V|
|00004680| 05 e0 0d 27 60 05 3a 0d | 27 6a 05 3a 0d 27 74 2c |...'`.:.|'j.:.'t,|
|00004690| dd 20 f2 64 72 61 77 67 | 6c 6f 62 65 28 6c 65 66 |. .drawg|lobe(lef|
|000046a0| 74 25 2c 62 6f 74 74 6f | 6d 25 2c 61 6e 67 6c 65 |t%,botto|m%,angle|
|000046b0| 31 2c 73 69 7a 65 25 29 | 0d 27 7e 2b f4 20 44 72 |1,size%)|.'~+. Dr|
|000046c0| 61 77 73 20 61 20 67 6c | 6f 62 65 20 74 6f 20 62 |aws a gl|obe to b|
|000046d0| 65 20 75 73 65 64 20 61 | 73 20 61 20 73 70 72 69 |e used a|s a spri|
|000046e0| 74 65 2e 0d 27 88 19 ea | 20 78 63 25 2c 79 63 25 |te..'...| xc%,yc%|
|000046f0| 2c 72 61 64 25 2c 61 6e | 67 6c 65 32 0d 27 92 05 |,rad%,an|gle2.'..|
|00004700| 3a 0d 27 9c 1b f4 20 49 | 6e 69 74 69 61 6c 69 73 |:.'... I|nitialis|
|00004710| 65 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 27 a6 05 |e variab|les..'..|
|00004720| 3a 0d 27 b0 05 3a 0d 27 | ba 05 3a 0d 27 c4 1d 78 |:.'..:.'|..:.'..x|
|00004730| 63 25 20 20 20 20 20 3d | 20 6c 65 66 74 25 20 20 |c% =| left% |
|00004740| 2b 73 69 7a 65 25 2f 32 | 0d 27 ce 1d 79 63 25 20 |+size%/2|.'..yc% |
|00004750| 20 20 20 20 3d 20 62 6f | 74 74 6f 6d 25 2b 73 69 | = bo|ttom%+si|
|00004760| 7a 65 25 2f 32 0d 27 d8 | 15 72 61 64 25 20 20 20 |ze%/2.'.|.rad% |
|00004770| 20 3d 20 73 69 7a 65 25 | 2f 34 0d 27 e2 05 3a 0d | = size%|/4.'..:.|
|00004780| 27 ec 18 61 6e 67 6c 65 | 32 20 20 3d 20 61 6e 67 |'..angle|2 = ang|
|00004790| 6c 65 31 2d af 2f 32 0d | 27 f6 05 3a 0d 28 00 16 |le1-./2.|'..:.(..|
|000047a0| f4 20 44 72 61 77 20 67 | 6c 6f 62 65 20 61 78 69 |. Draw g|lobe axi|
|000047b0| 73 2e 0d 28 0a 07 e6 20 | 37 0d 28 14 29 c8 9d 20 |s..(... |7.(.).. |
|000047c0| c8 90 20 78 63 25 2c 79 | 63 25 2c 73 69 7a 65 25 |.. xc%,y|c%,size%|
|000047d0| 2f 32 2c 73 69 7a 65 25 | 2f 36 34 2c 61 6e 67 6c |/2,size%|/64,angl|
|000047e0| 65 31 0d 28 1e 05 3a 0d | 28 28 1d f4 20 44 72 61 |e1.(..:.|((.. Dra|
|000047f0| 77 20 67 6c 6f 62 65 20 | 62 6f 74 74 6f 6d 20 68 |w globe |bottom h|
|00004800| 61 6c 66 2e 0d 28 32 07 | e6 20 34 0d 28 3c 0d ec |alf..(2.|. 4.(<..|
|00004810| 20 78 63 25 2c 79 63 25 | 0d 28 46 2f ec 20 20 20 | xc%,yc%|.(F/. |
|00004820| 20 20 78 63 25 2d 72 61 | 64 25 2a 9b 28 61 6e 67 | xc%-ra|d%*.(ang|
|00004830| 6c 65 32 29 2c 79 63 25 | 2d 72 61 64 25 2a b5 28 |le2),yc%|-rad%*.(|
|00004840| 61 6e 67 6c 65 32 29 0d | 28 50 2f f0 20 26 42 35 |angle2).|(P/. &B5|
|00004850| 2c 78 63 25 2b 72 61 64 | 25 2a 9b 28 61 6e 67 6c |,xc%+rad|%*.(angl|
|00004860| 65 32 29 2c 79 63 25 2b | 72 61 64 25 2a b5 28 61 |e2),yc%+|rad%*.(a|
|00004870| 6e 67 6c 65 32 29 0d 28 | 5a 05 3a 0d 28 64 1b f4 |ngle2).(|Z.:.(d..|
|00004880| 20 44 72 61 77 20 73 61 | 74 65 6c 6c 69 74 65 20 | Draw sa|tellite |
|00004890| 6f 72 62 69 74 2e 0d 28 | 6e 07 e6 20 36 0d 28 78 |orbit..(|n.. 6.(x|
|000048a0| 25 c8 9d 20 78 63 25 2c | 79 63 25 2c 73 69 7a 65 |%.. xc%,|yc%,size|
|000048b0| 25 2f 38 2c 73 69 7a 65 | 25 2f 32 2c 61 6e 67 6c |%/8,size|%/2,angl|
|000048c0| 65 31 0d 28 82 05 3a 0d | 28 8c 1a f4 20 44 72 61 |e1.(..:.|(... Dra|
|000048d0| 77 20 67 6c 6f 62 65 20 | 74 6f 70 20 68 61 6c 66 |w globe |top half|
|000048e0| 2e 0d 28 96 07 e6 20 34 | 0d 28 a0 0d ec 20 78 63 |..(... 4|.(... xc|
|000048f0| 25 2c 79 63 25 0d 28 aa | 2f ec 20 20 20 20 20 78 |%,yc%.(.|/. x|
|00004900| 63 25 2b 72 61 64 25 2a | 9b 28 61 6e 67 6c 65 32 |c%+rad%*|.(angle2|
|00004910| 29 2c 79 63 25 2b 72 61 | 64 25 2a b5 28 61 6e 67 |),yc%+ra|d%*.(ang|
|00004920| 6c 65 32 29 0d 28 b4 2f | f0 20 26 42 35 2c 78 63 |le2).(./|. &B5,xc|
|00004930| 25 2d 72 61 64 25 2a 9b | 28 61 6e 67 6c 65 32 29 |%-rad%*.|(angle2)|
|00004940| 2c 79 63 25 2d 72 61 64 | 25 2a b5 28 61 6e 67 6c |,yc%-rad|%*.(angl|
|00004950| 65 32 29 0d 28 be 05 3a | 0d 28 c8 05 3a 0d 28 d2 |e2).(..:|.(..:.(.|
|00004960| 05 3a 0d 28 dc 05 3a 0d | 28 e6 05 3a 0d 28 f0 05 |.:.(..:.|(..:.(..|
|00004970| e1 0d 28 fa 05 3a 0d 29 | 04 2b dd 20 f2 67 65 74 |..(..:.)|.+. .get|
|00004980| 73 70 72 69 74 65 28 6e | 61 6d 65 25 2c 6c 65 66 |sprite(n|ame%,lef|
|00004990| 74 25 2c 62 6f 74 74 6f | 6d 25 2c 73 69 7a 65 25 |t%,botto|m%,size%|
|000049a0| 29 0d 29 0e 28 f4 20 50 | 69 63 6b 20 20 75 70 20 |).).(. P|ick up |
|000049b0| 61 20 73 70 72 69 74 65 | 20 66 72 6f 6d 20 74 68 |a sprite| from th|
|000049c0| 65 20 73 63 72 65 65 6e | 2e 0d 29 18 28 f4 20 53 |e screen|..).(. S|
|000049d0| 61 76 65 20 69 74 20 69 | 6e 20 74 68 65 20 73 79 |ave it i|n the sy|
|000049e0| 73 74 65 6d 20 73 70 72 | 69 74 65 20 61 72 65 61 |stem spr|ite area|
|000049f0| 2e 0d 29 22 1f ea 20 72 | 69 67 68 74 25 2c 74 6f |..)".. r|ight%,to|
|00004a00| 70 25 2c 67 65 74 25 2c | 70 61 6c 65 74 74 65 25 |p%,get%,|palette%|
|00004a10| 0d 29 2c 05 3a 0d 29 36 | 1b f4 20 49 6e 69 74 69 |.),.:.)6|.. Initi|
|00004a20| 61 6c 69 73 65 20 76 61 | 72 69 61 62 6c 65 73 2e |alise va|riables.|
|00004a30| 0d 29 40 12 67 65 74 25 | 20 20 20 20 20 3d 20 20 |.)@.get%| = |
|00004a40| 31 36 0d 29 4a 12 70 61 | 6c 65 74 74 65 25 20 3d |16.)J.pa|lette% =|
|00004a50| 20 20 20 31 0d 29 54 05 | 3a 0d 29 5e 1e 72 69 67 | 1.)T.|:.)^.rig|
|00004a60| 68 74 25 20 20 20 3d 20 | 6c 65 66 74 25 20 20 2b |ht% = |left% +|
|00004a70| 73 69 7a 65 25 2d 31 0d | 29 68 1e 74 6f 70 25 20 |size%-1.|)h.top% |
|00004a80| 20 20 20 20 3d 20 62 6f | 74 74 6f 6d 25 2b 73 69 | = bo|ttom%+si|
|00004a90| 7a 65 25 2d 31 0d 29 72 | 05 3a 0d 29 7c 05 3a 0d |ze%-1.)r|.:.)|.:.|
|00004aa0| 29 86 05 3a 0d 29 90 05 | 3a 0d 29 9a 05 3a 0d 29 |)..:.)..|:.)..:.)|
|00004ab0| a4 43 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |.C.. "OS|_SpriteO|
|00004ac0| 70 22 2c 67 65 74 25 2c | 2c 6e 61 6d 65 25 2c 70 |p",get%,|,name%,p|
|00004ad0| 61 6c 65 74 74 65 25 2c | 6c 65 66 74 25 2c 62 6f |alette%,|left%,bo|
|00004ae0| 74 74 6f 6d 25 2c 72 69 | 67 68 74 25 2c 74 6f 70 |ttom%,ri|ght%,top|
|00004af0| 25 0d 29 ae 05 3a 0d 29 | b8 05 e1 0d 29 c2 05 3a |%.)..:.)|....)..:|
|00004b00| 0d 29 cc 18 dd 20 f2 73 | 61 76 65 73 70 72 69 74 |.)... .s|avesprit|
|00004b10| 65 28 6e 61 6d 65 25 29 | 0d 29 d6 24 f4 20 53 61 |e(name%)|.).$. Sa|
|00004b20| 76 65 73 20 74 68 65 20 | 73 70 72 69 74 65 20 61 |ves the |sprite a|
|00004b30| 72 65 61 20 74 6f 20 64 | 69 73 63 2e 0d 29 e0 0b |rea to d|isc..)..|
|00004b40| ea 20 73 61 76 65 25 0d | 29 ea 1b f4 20 49 6e 69 |. save%.|)... Ini|
|00004b50| 74 69 61 6c 69 73 65 20 | 76 61 72 69 61 62 6c 65 |tialise |variable|
|00004b60| 73 2e 0d 29 f4 12 73 61 | 76 65 25 20 20 20 20 3d |s..)..sa|ve% =|
|00004b70| 20 20 31 32 0d 29 fe 05 | 3a 0d 2a 08 21 c8 99 20 | 12.)..|:.*.!.. |
|00004b80| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 73 61 |"OS_Spri|teOp",sa|
|00004b90| 76 65 25 2c 2c 6e 61 6d | 65 25 0d 2a 12 05 3a 0d |ve%,,nam|e%.*..:.|
|00004ba0| 2a 1c 05 e1 0d 2a 26 05 | 3a 0d 2a 30 18 dd 20 f2 |*....*&.|:.*0.. .|
|00004bb0| 6c 6f 61 64 73 70 72 69 | 74 65 28 6e 61 6d 65 25 |loadspri|te(name%|
|00004bc0| 29 0d 2a 3a 24 f4 20 4c | 6f 61 64 73 20 61 20 73 |).*:$. L|oads a s|
|00004bd0| 70 72 69 74 65 20 66 69 | 6c 65 20 66 72 6f 6d 20 |prite fi|le from |
|00004be0| 64 69 73 63 2e 0d 2a 44 | 0b ea 20 6c 6f 61 64 25 |disc..*D|.. load%|
|00004bf0| 0d 2a 4e 1b f4 20 49 6e | 69 74 69 61 6c 69 73 65 |.*N.. In|itialise|
|00004c00| 20 76 61 72 69 61 62 6c | 65 73 2e 0d 2a 58 12 6c | variabl|es..*X.l|
|00004c10| 6f 61 64 25 20 20 20 20 | 3d 20 20 31 30 0d 2a 62 |oad% |= 10.*b|
|00004c20| 05 3a 0d 2a 6c 21 c8 99 | 20 22 4f 53 5f 53 70 72 |.:.*l!..| "OS_Spr|
|00004c30| 69 74 65 4f 70 22 2c 6c | 6f 61 64 25 2c 2c 6e 61 |iteOp",l|oad%,,na|
|00004c40| 6d 65 25 0d 2a 76 05 3a | 0d 2a 80 05 e1 0d 2a 8a |me%.*v.:|.*....*.|
|00004c50| 05 3a 0d 2a 94 2c dd 20 | f2 70 6c 6f 74 73 70 72 |.:.*.,. |.plotspr|
|00004c60| 69 74 65 28 6e 61 6d 65 | 25 2c 6c 65 66 74 25 2c |ite(name|%,left%,|
|00004c70| 62 6f 74 74 6f 6d 25 2c | 73 74 65 70 25 29 0d 2a |bottom%,|step%).*|
|00004c80| 9e 22 f4 20 50 6c 6f 74 | 73 20 61 20 73 70 72 69 |.". Plot|s a spri|
|00004c90| 74 65 20 74 6f 20 74 68 | 65 20 73 63 72 65 65 6e |te to th|e screen|
|00004ca0| 0d 2a a8 23 f4 20 20 66 | 72 6f 6d 20 74 68 65 20 |.*.#. f|rom the |
|00004cb0| 73 79 73 74 65 6d 20 73 | 70 72 69 74 65 20 61 72 |system s|prite ar|
|00004cc0| 65 61 2e 0d 2a b2 11 ea | 20 70 6c 6f 74 25 2c 67 |ea..*...| plot%,g|
|00004cd0| 63 6f 6c 25 0d 2a bc 05 | 3a 0d 2a c6 1b f4 20 49 |col%.*..|:.*... I|
|00004ce0| 6e 69 74 69 61 6c 69 73 | 65 20 76 61 72 69 61 62 |nitialis|e variab|
|00004cf0| 6c 65 73 2e 0d 2a d0 11 | 70 6c 6f 74 25 20 20 20 |les..*..|plot% |
|00004d00| 3d 20 20 33 34 0d 2a da | 11 67 63 6f 6c 25 20 20 |= 34.*.|.gcol% |
|00004d10| 20 3d 20 20 20 38 0d 2a | e4 05 3a 0d 2a ee 21 f4 | = 8.*|..:.*.!.|
|00004d20| 20 50 6c 6f 74 20 74 68 | 65 20 73 70 72 69 74 65 | Plot th|e sprite|
|00004d30| 20 66 6f 75 72 20 74 69 | 6d 65 73 2e 0d 2a f8 35 | four ti|mes..*.5|
|00004d40| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00004d50| 2c 70 6c 6f 74 25 2c 2c | 6e 61 6d 65 25 2c 6c 65 |,plot%,,|name%,le|
|00004d60| 66 74 25 2c 62 6f 74 74 | 6f 6d 25 2c 67 63 6f 6c |ft%,bott|om%,gcol|
|00004d70| 25 0d 2b 02 3b c8 99 20 | 22 4f 53 5f 53 70 72 69 |%.+.;.. |"OS_Spri|
|00004d80| 74 65 4f 70 22 2c 70 6c | 6f 74 25 2c 2c 6e 61 6d |teOp",pl|ot%,,nam|
|00004d90| 65 25 2c 6c 65 66 74 25 | 2b 73 74 65 70 25 2c 62 |e%,left%|+step%,b|
|00004da0| 6f 74 74 6f 6d 25 2c 67 | 63 6f 6c 25 0d 2b 0c 41 |ottom%,g|col%.+.A|
|00004db0| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00004dc0| 2c 70 6c 6f 74 25 2c 2c | 6e 61 6d 65 25 2c 6c 65 |,plot%,,|name%,le|
|00004dd0| 66 74 25 2b 73 74 65 70 | 25 2c 62 6f 74 74 6f 6d |ft%+step|%,bottom|
|00004de0| 25 2b 73 74 65 70 25 2c | 67 63 6f 6c 25 0d 2b 16 |%+step%,|gcol%.+.|
|00004df0| 3b c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |;.. "OS_|SpriteOp|
|00004e00| 22 2c 70 6c 6f 74 25 2c | 2c 6e 61 6d 65 25 2c 6c |",plot%,|,name%,l|
|00004e10| 65 66 74 25 2c 62 6f 74 | 74 6f 6d 25 2b 73 74 65 |eft%,bot|tom%+ste|
|00004e20| 70 25 2c 67 63 6f 6c 25 | 0d 2b 20 05 3a 0d 2b 2a |p%,gcol%|.+ .:.+*|
|00004e30| 05 3a 0d 2b 34 05 3a 0d | 2b 3e 05 3a 0d 2b 48 05 |.:.+4.:.|+>.:.+H.|
|00004e40| e1 0d 2b 52 05 3a 0d ff | 46 69 6c 65 44 61 74 61 |..+R.:..|FileData|
|00004e50| 82 53 79 73 46 58 30 33 | 31 00 00 00 2d 0b 00 00 |.SysFX03|1...-...|
|00004e60| 41 fb ff ff a6 60 ff 8c | 03 00 1c ac 0d 00 64 27 |A....`..|......d'|
|00004e70| f4 20 3e 20 3c 53 79 73 | 46 58 24 44 69 72 3e 2e |. > <Sys|FX$Dir>.|
|00004e80| 42 61 73 69 63 50 72 6f | 67 73 2e 53 79 73 46 58 |BasicPro|gs.SysFX|
|00004e90| 30 33 31 0d 00 6e 1f f4 | 20 41 75 74 68 6f 72 20 |031..n..| Author |
|00004ea0| 20 20 20 20 20 20 3a 20 | 47 20 4c 20 46 69 74 74 | : |G L Fitt|
|00004eb0| 6f 6e 0d 00 78 24 f4 20 | 43 6f 70 79 72 69 67 68 |on..x$. |Copyrigh|
|00004ec0| 74 20 20 20 20 3a 20 41 | 42 41 43 55 53 20 54 52 |t : A|BACUS TR|
|00004ed0| 41 49 4e 49 4e 47 0d 00 | 82 24 f4 20 56 65 72 73 |AINING..|.$. Vers|
|00004ee0| 69 6f 6e 20 30 2e 30 30 | 20 3a 20 32 30 74 68 20 |ion 0.00| : 20th |
|00004ef0| 4d 61 72 63 68 20 31 39 | 38 39 0d 00 8c 05 3a 0d |March 19|89....:.|
|00004f00| 00 96 22 f4 20 44 65 6d | 6f 6e 73 74 72 61 74 65 |..". Dem|onstrate|
|00004f10| 73 20 53 79 73 74 65 6d | 20 53 70 72 69 74 65 73 |s System| Sprites|
|00004f20| 2e 0d 00 a0 05 3a 0d 00 | aa 16 f4 20 50 72 65 43 |.....:..|... PreC|
|00004f30| 6f 72 65 20 53 65 63 74 | 69 6f 6e 2e 0d 00 b4 18 |ore Sect|ion.....|
|00004f40| f4 20 53 65 74 20 75 70 | 20 65 72 72 6f 72 20 74 |. Set up| error t|
|00004f50| 72 61 70 2e 0d 00 be 0e | ee 20 85 20 f2 65 72 72 |rap.....|. . .err|
|00004f60| 6f 72 0d 00 c8 05 3a 0d | 00 d2 16 f4 20 43 68 6f |or....:.|.... Cho|
|00004f70| 6f 73 65 20 74 68 65 20 | 6d 6f 64 65 2e 0d 00 dc |ose the |mode....|
|00004f80| 08 eb 20 31 32 0d 00 e6 | 05 3a 0d 00 f0 1f f4 20 |.. 12...|.:..... |
|00004f90| 44 65 63 6c 61 72 65 20 | 67 6c 6f 62 61 6c 20 76 |Declare |global v|
|00004fa0| 61 72 69 61 62 6c 65 73 | 2e 0d 00 fa 16 78 63 65 |ariables|.....xce|
|00004fb0| 6e 74 72 65 25 20 20 20 | 20 3d 20 20 36 34 30 0d |ntre% | = 640.|
|00004fc0| 01 04 16 79 63 65 6e 74 | 72 65 25 20 20 20 20 3d |...ycent|re% =|
|00004fd0| 20 20 35 31 32 0d 01 0e | 18 61 6e 67 6c 65 20 20 | 512...|.angle |
|00004fe0| 20 20 20 20 20 3d 20 20 | 33 2a af 2f 38 0d 01 18 | = |3*./8...|
|00004ff0| 16 73 73 69 7a 65 25 20 | 20 20 20 20 20 3d 20 20 |.ssize% | = |
|00005000| 35 31 32 0d 01 22 05 3a | 0d 01 2c 10 de 20 73 6e |512..".:|..,.. sn|
|00005010| 61 6d 65 25 20 26 32 30 | 0d 01 36 10 de 20 66 6e |ame% &20|..6.. fn|
|00005020| 61 6d 65 25 20 26 32 30 | 0d 01 40 05 3a 0d 01 4a |ame% &20|..@.:..J|
|00005030| 19 24 73 6e 61 6d 65 25 | 20 20 20 20 20 3d 20 22 |.$sname%| = "|
|00005040| 67 6c 6f 62 65 22 0d 01 | 54 34 24 66 6e 61 6d 65 |globe"..|T4$fname|
|00005050| 25 20 20 20 20 20 3d 20 | 22 3c 53 79 73 46 58 24 |% = |"<SysFX$|
|00005060| 44 69 72 3e 2e 4d 79 53 | 70 72 69 74 65 73 2e 53 |Dir>.MyS|prites.S|
|00005070| 70 72 69 74 65 46 69 6c | 65 22 0d 01 5e 05 3a 0d |priteFil|e"..^.:.|
|00005080| 01 68 27 f4 20 47 69 76 | 65 20 76 61 72 69 61 62 |.h'. Giv|e variab|
|00005090| 6c 65 20 6e 61 6d 65 73 | 20 74 6f 20 53 70 72 69 |le names| to Spri|
|000050a0| 74 65 4f 70 73 2e 0d 01 | 72 15 6e 65 77 25 20 20 |teOps...|r.new% |
|000050b0| 20 20 20 20 20 20 3d 20 | 20 20 39 0d 01 7c 05 3a | = | 9..|.:|
|000050c0| 0d 01 86 05 3a 0d 01 90 | 05 3a 0d 03 e8 13 f4 20 |....:...|.:..... |
|000050d0| 43 6f 72 65 20 53 65 63 | 74 69 6f 6e 2e 0d 03 f2 |Core Sec|tion....|
|000050e0| 05 3a 0d 03 fc 19 c8 99 | 20 22 4f 53 5f 53 70 72 |.:......| "OS_Spr|
|000050f0| 69 74 65 4f 70 22 2c 6e | 65 77 25 0d 04 06 05 3a |iteOp",n|ew%....:|
|00005100| 0d 04 10 05 3a 0d 04 1a | 05 3a 0d 04 24 05 3a 0d |....:...|.:..$.:.|
|00005110| 04 2e 05 3a 0d 04 38 17 | f2 6c 6f 61 64 73 70 72 |...:..8.|.loadspr|
|00005120| 69 74 65 28 66 6e 61 6d | 65 25 29 0d 04 42 4a f2 |ite(fnam|e%)..BJ.|
|00005130| 70 6c 6f 74 73 70 72 69 | 74 65 28 73 6e 61 6d 65 |plotspri|te(sname|
|00005140| 25 2c 78 63 65 6e 74 72 | 65 25 2d 33 2a 73 73 69 |%,xcentr|e%-3*ssi|
|00005150| 7a 65 25 2f 34 2c 79 63 | 65 6e 74 72 65 25 2d 33 |ze%/4,yc|entre%-3|
|00005160| 2a 73 73 69 7a 65 25 2f | 34 2c 33 2a 73 73 69 7a |*ssize%/|4,3*ssiz|
|00005170| 65 25 2f 34 29 0d 04 4c | 05 e0 0d 04 56 05 3a 0d |e%/4)..L|....V.:.|
|00005180| 04 60 05 3a 0d 27 10 0c | dd 20 f2 65 72 72 6f 72 |.`.:.'..|. .error|
|00005190| 0d 27 1a 17 f4 20 52 65 | 70 6f 72 74 73 20 61 6e |.'... Re|ports an|
|000051a0| 20 65 72 72 6f 72 2e 0d | 27 24 05 3a 0d 27 2e 05 | error..|'$.:.'..|
|000051b0| 3a 0d 27 38 05 3a 0d 27 | 42 05 f6 0d 27 4c 13 f1 |:.'8.:.'|B...'L..|
|000051c0| 20 22 20 61 74 20 6c 69 | 6e 65 20 22 3b 9e 0d 27 | " at li|ne ";..'|
|000051d0| 56 05 e0 0d 27 60 05 3a | 0d 27 6a 05 3a 0d 27 74 |V...'`.:|.'j.:.'t|
|000051e0| 2c dd 20 f2 64 72 61 77 | 67 6c 6f 62 65 28 6c 65 |,. .draw|globe(le|
|000051f0| 66 74 25 2c 62 6f 74 74 | 6f 6d 25 2c 61 6e 67 6c |ft%,bott|om%,angl|
|00005200| 65 31 2c 73 69 7a 65 25 | 29 0d 27 7e 2b f4 20 44 |e1,size%|).'~+. D|
|00005210| 72 61 77 73 20 61 20 67 | 6c 6f 62 65 20 74 6f 20 |raws a g|lobe to |
|00005220| 62 65 20 75 73 65 64 20 | 61 73 20 61 20 73 70 72 |be used |as a spr|
|00005230| 69 74 65 2e 0d 27 88 19 | ea 20 78 63 25 2c 79 63 |ite..'..|. xc%,yc|
|00005240| 25 2c 72 61 64 25 2c 61 | 6e 67 6c 65 32 0d 27 92 |%,rad%,a|ngle2.'.|
|00005250| 05 3a 0d 27 9c 1b f4 20 | 49 6e 69 74 69 61 6c 69 |.:.'... |Initiali|
|00005260| 73 65 20 76 61 72 69 61 | 62 6c 65 73 2e 0d 27 a6 |se varia|bles..'.|
|00005270| 05 3a 0d 27 b0 05 3a 0d | 27 ba 05 3a 0d 27 c4 1d |.:.'..:.|'..:.'..|
|00005280| 78 63 25 20 20 20 20 20 | 3d 20 6c 65 66 74 25 20 |xc% |= left% |
|00005290| 20 2b 73 69 7a 65 25 2f | 32 0d 27 ce 1d 79 63 25 | +size%/|2.'..yc%|
|000052a0| 20 20 20 20 20 3d 20 62 | 6f 74 74 6f 6d 25 2b 73 | = b|ottom%+s|
|000052b0| 69 7a 65 25 2f 32 0d 27 | d8 15 72 61 64 25 20 20 |ize%/2.'|..rad% |
|000052c0| 20 20 3d 20 73 69 7a 65 | 25 2f 34 0d 27 e2 05 3a | = size|%/4.'..:|
|000052d0| 0d 27 ec 18 61 6e 67 6c | 65 32 20 20 3d 20 61 6e |.'..angl|e2 = an|
|000052e0| 67 6c 65 31 2d af 2f 32 | 0d 27 f6 05 3a 0d 28 00 |gle1-./2|.'..:.(.|
|000052f0| 16 f4 20 44 72 61 77 20 | 67 6c 6f 62 65 20 61 78 |.. Draw |globe ax|
|00005300| 69 73 2e 0d 28 0a 07 e6 | 20 37 0d 28 14 29 c8 9d |is..(...| 7.(.)..|
|00005310| 20 c8 90 20 78 63 25 2c | 79 63 25 2c 73 69 7a 65 | .. xc%,|yc%,size|
|00005320| 25 2f 32 2c 73 69 7a 65 | 25 2f 36 34 2c 61 6e 67 |%/2,size|%/64,ang|
|00005330| 6c 65 31 0d 28 1e 05 3a | 0d 28 28 1d f4 20 44 72 |le1.(..:|.((.. Dr|
|00005340| 61 77 20 67 6c 6f 62 65 | 20 62 6f 74 74 6f 6d 20 |aw globe| bottom |
|00005350| 68 61 6c 66 2e 0d 28 32 | 07 e6 20 34 0d 28 3c 0d |half..(2|.. 4.(<.|
|00005360| ec 20 78 63 25 2c 79 63 | 25 0d 28 46 2f ec 20 20 |. xc%,yc|%.(F/. |
|00005370| 20 20 20 78 63 25 2d 72 | 61 64 25 2a 9b 28 61 6e | xc%-r|ad%*.(an|
|00005380| 67 6c 65 32 29 2c 79 63 | 25 2d 72 61 64 25 2a b5 |gle2),yc|%-rad%*.|
|00005390| 28 61 6e 67 6c 65 32 29 | 0d 28 50 2f f0 20 26 42 |(angle2)|.(P/. &B|
|000053a0| 35 2c 78 63 25 2b 72 61 | 64 25 2a 9b 28 61 6e 67 |5,xc%+ra|d%*.(ang|
|000053b0| 6c 65 32 29 2c 79 63 25 | 2b 72 61 64 25 2a b5 28 |le2),yc%|+rad%*.(|
|000053c0| 61 6e 67 6c 65 32 29 0d | 28 5a 05 3a 0d 28 64 1b |angle2).|(Z.:.(d.|
|000053d0| f4 20 44 72 61 77 20 73 | 61 74 65 6c 6c 69 74 65 |. Draw s|atellite|
|000053e0| 20 6f 72 62 69 74 2e 0d | 28 6e 07 e6 20 36 0d 28 | orbit..|(n.. 6.(|
|000053f0| 78 25 c8 9d 20 78 63 25 | 2c 79 63 25 2c 73 69 7a |x%.. xc%|,yc%,siz|
|00005400| 65 25 2f 38 2c 73 69 7a | 65 25 2f 32 2c 61 6e 67 |e%/8,siz|e%/2,ang|
|00005410| 6c 65 31 0d 28 82 05 3a | 0d 28 8c 1a f4 20 44 72 |le1.(..:|.(... Dr|
|00005420| 61 77 20 67 6c 6f 62 65 | 20 74 6f 70 20 68 61 6c |aw globe| top hal|
|00005430| 66 2e 0d 28 96 07 e6 20 | 34 0d 28 a0 0d ec 20 78 |f..(... |4.(... x|
|00005440| 63 25 2c 79 63 25 0d 28 | aa 2f ec 20 20 20 20 20 |c%,yc%.(|./. |
|00005450| 78 63 25 2b 72 61 64 25 | 2a 9b 28 61 6e 67 6c 65 |xc%+rad%|*.(angle|
|00005460| 32 29 2c 79 63 25 2b 72 | 61 64 25 2a b5 28 61 6e |2),yc%+r|ad%*.(an|
|00005470| 67 6c 65 32 29 0d 28 b4 | 2f f0 20 26 42 35 2c 78 |gle2).(.|/. &B5,x|
|00005480| 63 25 2d 72 61 64 25 2a | 9b 28 61 6e 67 6c 65 32 |c%-rad%*|.(angle2|
|00005490| 29 2c 79 63 25 2d 72 61 | 64 25 2a b5 28 61 6e 67 |),yc%-ra|d%*.(ang|
|000054a0| 6c 65 32 29 0d 28 be 05 | 3a 0d 28 c8 05 3a 0d 28 |le2).(..|:.(..:.(|
|000054b0| d2 05 3a 0d 28 dc 05 3a | 0d 28 e6 05 3a 0d 28 f0 |..:.(..:|.(..:.(.|
|000054c0| 05 e1 0d 28 fa 05 3a 0d | 29 04 2b dd 20 f2 67 65 |...(..:.|).+. .ge|
|000054d0| 74 73 70 72 69 74 65 28 | 6e 61 6d 65 25 2c 6c 65 |tsprite(|name%,le|
|000054e0| 66 74 25 2c 62 6f 74 74 | 6f 6d 25 2c 73 69 7a 65 |ft%,bott|om%,size|
|000054f0| 25 29 0d 29 0e 28 f4 20 | 50 69 63 6b 20 20 75 70 |%).).(. |Pick up|
|00005500| 20 61 20 73 70 72 69 74 | 65 20 66 72 6f 6d 20 74 | a sprit|e from t|
|00005510| 68 65 20 73 63 72 65 65 | 6e 2e 0d 29 18 28 f4 20 |he scree|n..).(. |
|00005520| 53 61 76 65 20 69 74 20 | 69 6e 20 74 68 65 20 73 |Save it |in the s|
|00005530| 79 73 74 65 6d 20 73 70 | 72 69 74 65 20 61 72 65 |ystem sp|rite are|
|00005540| 61 2e 0d 29 22 1f ea 20 | 72 69 67 68 74 25 2c 74 |a..)".. |right%,t|
|00005550| 6f 70 25 2c 67 65 74 25 | 2c 70 61 6c 65 74 74 65 |op%,get%|,palette|
|00005560| 25 0d 29 2c 05 3a 0d 29 | 36 1b f4 20 49 6e 69 74 |%.),.:.)|6.. Init|
|00005570| 69 61 6c 69 73 65 20 76 | 61 72 69 61 62 6c 65 73 |ialise v|ariables|
|00005580| 2e 0d 29 40 12 67 65 74 | 25 20 20 20 20 20 3d 20 |..)@.get|% = |
|00005590| 20 31 36 0d 29 4a 12 70 | 61 6c 65 74 74 65 25 20 | 16.)J.p|alette% |
|000055a0| 3d 20 20 20 31 0d 29 54 | 05 3a 0d 29 5e 1e 72 69 |= 1.)T|.:.)^.ri|
|000055b0| 67 68 74 25 20 20 20 3d | 20 6c 65 66 74 25 20 20 |ght% =| left% |
|000055c0| 2b 73 69 7a 65 25 2d 31 | 0d 29 68 1e 74 6f 70 25 |+size%-1|.)h.top%|
|000055d0| 20 20 20 20 20 3d 20 62 | 6f 74 74 6f 6d 25 2b 73 | = b|ottom%+s|
|000055e0| 69 7a 65 25 2d 31 0d 29 | 72 05 3a 0d 29 7c 05 3a |ize%-1.)|r.:.)|.:|
|000055f0| 0d 29 86 05 3a 0d 29 90 | 05 3a 0d 29 9a 05 3a 0d |.)..:.).|.:.)..:.|
|00005600| 29 a4 43 c8 99 20 22 4f | 53 5f 53 70 72 69 74 65 |).C.. "O|S_Sprite|
|00005610| 4f 70 22 2c 67 65 74 25 | 2c 2c 6e 61 6d 65 25 2c |Op",get%|,,name%,|
|00005620| 70 61 6c 65 74 74 65 25 | 2c 6c 65 66 74 25 2c 62 |palette%|,left%,b|
|00005630| 6f 74 74 6f 6d 25 2c 72 | 69 67 68 74 25 2c 74 6f |ottom%,r|ight%,to|
|00005640| 70 25 0d 29 ae 05 3a 0d | 29 b8 05 e1 0d 29 c2 05 |p%.)..:.|)....)..|
|00005650| 3a 0d 29 cc 18 dd 20 f2 | 73 61 76 65 73 70 72 69 |:.)... .|savespri|
|00005660| 74 65 28 6e 61 6d 65 25 | 29 0d 29 d6 24 f4 20 53 |te(name%|).).$. S|
|00005670| 61 76 65 73 20 74 68 65 | 20 73 70 72 69 74 65 20 |aves the| sprite |
|00005680| 61 72 65 61 20 74 6f 20 | 64 69 73 63 2e 0d 29 e0 |area to |disc..).|
|00005690| 0b ea 20 73 61 76 65 25 | 0d 29 ea 1b f4 20 49 6e |.. save%|.)... In|
|000056a0| 69 74 69 61 6c 69 73 65 | 20 76 61 72 69 61 62 6c |itialise| variabl|
|000056b0| 65 73 2e 0d 29 f4 12 73 | 61 76 65 25 20 20 20 20 |es..)..s|ave% |
|000056c0| 3d 20 20 31 32 0d 29 fe | 05 3a 0d 2a 08 21 c8 99 |= 12.).|.:.*.!..|
|000056d0| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 73 | "OS_Spr|iteOp",s|
|000056e0| 61 76 65 25 2c 2c 6e 61 | 6d 65 25 0d 2a 12 05 3a |ave%,,na|me%.*..:|
|000056f0| 0d 2a 1c 05 e1 0d 2a 26 | 05 3a 0d 2a 30 18 dd 20 |.*....*&|.:.*0.. |
|00005700| f2 6c 6f 61 64 73 70 72 | 69 74 65 28 6e 61 6d 65 |.loadspr|ite(name|
|00005710| 25 29 0d 2a 3a 24 f4 20 | 4c 6f 61 64 73 20 61 20 |%).*:$. |Loads a |
|00005720| 73 70 72 69 74 65 20 66 | 69 6c 65 20 66 72 6f 6d |sprite f|ile from|
|00005730| 20 64 69 73 63 2e 0d 2a | 44 0b ea 20 6c 6f 61 64 | disc..*|D.. load|
|00005740| 25 0d 2a 4e 1b f4 20 49 | 6e 69 74 69 61 6c 69 73 |%.*N.. I|nitialis|
|00005750| 65 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 2a 58 12 |e variab|les..*X.|
|00005760| 6c 6f 61 64 25 20 20 20 | 20 3d 20 20 31 30 0d 2a |load% | = 10.*|
|00005770| 62 05 3a 0d 2a 6c 21 c8 | 99 20 22 4f 53 5f 53 70 |b.:.*l!.|. "OS_Sp|
|00005780| 72 69 74 65 4f 70 22 2c | 6c 6f 61 64 25 2c 2c 6e |riteOp",|load%,,n|
|00005790| 61 6d 65 25 0d 2a 76 05 | 3a 0d 2a 80 05 e1 0d 2a |ame%.*v.|:.*....*|
|000057a0| 8a 05 3a 0d 2a 94 2c dd | 20 f2 70 6c 6f 74 73 70 |..:.*.,.| .plotsp|
|000057b0| 72 69 74 65 28 6e 61 6d | 65 25 2c 6c 65 66 74 25 |rite(nam|e%,left%|
|000057c0| 2c 62 6f 74 74 6f 6d 25 | 2c 73 74 65 70 25 29 0d |,bottom%|,step%).|
|000057d0| 2a 9e 22 f4 20 50 6c 6f | 74 73 20 61 20 73 70 72 |*.". Plo|ts a spr|
|000057e0| 69 74 65 20 74 6f 20 74 | 68 65 20 73 63 72 65 65 |ite to t|he scree|
|000057f0| 6e 0d 2a a8 23 f4 20 20 | 66 72 6f 6d 20 74 68 65 |n.*.#. |from the|
|00005800| 20 73 79 73 74 65 6d 20 | 73 70 72 69 74 65 20 61 | system |sprite a|
|00005810| 72 65 61 2e 0d 2a b2 11 | ea 20 70 6c 6f 74 25 2c |rea..*..|. plot%,|
|00005820| 67 63 6f 6c 25 0d 2a bc | 05 3a 0d 2a c6 1b f4 20 |gcol%.*.|.:.*... |
|00005830| 49 6e 69 74 69 61 6c 69 | 73 65 20 76 61 72 69 61 |Initiali|se varia|
|00005840| 62 6c 65 73 2e 0d 2a d0 | 11 70 6c 6f 74 25 20 20 |bles..*.|.plot% |
|00005850| 20 3d 20 20 33 34 0d 2a | da 11 67 63 6f 6c 25 20 | = 34.*|..gcol% |
|00005860| 20 20 3d 20 20 20 38 0d | 2a e4 05 3a 0d 2a ee 21 | = 8.|*..:.*.!|
|00005870| f4 20 50 6c 6f 74 20 74 | 68 65 20 73 70 72 69 74 |. Plot t|he sprit|
|00005880| 65 20 66 6f 75 72 20 74 | 69 6d 65 73 2e 0d 2a f8 |e four t|imes..*.|
|00005890| 35 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |5.. "OS_|SpriteOp|
|000058a0| 22 2c 70 6c 6f 74 25 2c | 2c 6e 61 6d 65 25 2c 6c |",plot%,|,name%,l|
|000058b0| 65 66 74 25 2c 62 6f 74 | 74 6f 6d 25 2c 67 63 6f |eft%,bot|tom%,gco|
|000058c0| 6c 25 0d 2b 02 3b c8 99 | 20 22 4f 53 5f 53 70 72 |l%.+.;..| "OS_Spr|
|000058d0| 69 74 65 4f 70 22 2c 70 | 6c 6f 74 25 2c 2c 6e 61 |iteOp",p|lot%,,na|
|000058e0| 6d 65 25 2c 6c 65 66 74 | 25 2b 73 74 65 70 25 2c |me%,left|%+step%,|
|000058f0| 62 6f 74 74 6f 6d 25 2c | 67 63 6f 6c 25 0d 2b 0c |bottom%,|gcol%.+.|
|00005900| 41 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |A.. "OS_|SpriteOp|
|00005910| 22 2c 70 6c 6f 74 25 2c | 2c 6e 61 6d 65 25 2c 6c |",plot%,|,name%,l|
|00005920| 65 66 74 25 2b 73 74 65 | 70 25 2c 62 6f 74 74 6f |eft%+ste|p%,botto|
|00005930| 6d 25 2b 73 74 65 70 25 | 2c 67 63 6f 6c 25 0d 2b |m%+step%|,gcol%.+|
|00005940| 16 3b c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |.;.. "OS|_SpriteO|
|00005950| 70 22 2c 70 6c 6f 74 25 | 2c 2c 6e 61 6d 65 25 2c |p",plot%|,,name%,|
|00005960| 6c 65 66 74 25 2c 62 6f | 74 74 6f 6d 25 2b 73 74 |left%,bo|ttom%+st|
|00005970| 65 70 25 2c 67 63 6f 6c | 25 0d 2b 20 05 3a 0d 2b |ep%,gcol|%.+ .:.+|
|00005980| 2a 05 3a 0d 2b 34 05 3a | 0d 2b 3e 05 3a 0d 2b 48 |*.:.+4.:|.+>.:.+H|
|00005990| 05 e1 0d 2b 52 05 3a 0d | ff 46 69 6c 65 44 61 74 |...+R.:.|.FileDat|
|000059a0| 61 82 53 79 73 46 58 30 | 34 30 00 00 00 ec 0c 00 |a.SysFX0|40......|
|000059b0| 00 41 fb ff ff 3c 6a ff | 8c 03 00 37 59 0d 00 64 |.A...<j.|...7Y..d|
|000059c0| 27 f4 20 3e 20 3c 53 79 | 73 46 58 24 44 69 72 3e |'. > <Sy|sFX$Dir>|
|000059d0| 2e 42 61 73 69 63 50 72 | 6f 67 73 2e 53 79 73 46 |.BasicPr|ogs.SysF|
|000059e0| 58 30 34 30 0d 00 6e 1f | f4 20 41 75 74 68 6f 72 |X040..n.|. Author|
|000059f0| 20 20 20 20 20 20 20 3a | 20 47 20 4c 20 46 69 74 | :| G L Fit|
|00005a00| 74 6f 6e 0d 00 78 24 f4 | 20 43 6f 70 79 72 69 67 |ton..x$.| Copyrig|
|00005a10| 68 74 20 20 20 20 3a 20 | 41 42 41 43 55 53 20 54 |ht : |ABACUS T|
|00005a20| 52 41 49 4e 49 4e 47 0d | 00 82 24 f4 20 56 65 72 |RAINING.|..$. Ver|
|00005a30| 73 69 6f 6e 20 30 2e 30 | 30 20 3a 20 32 30 74 68 |sion 0.0|0 : 20th|
|00005a40| 20 4d 61 72 63 68 20 31 | 39 38 39 0d 00 8c 05 3a | March 1|989....:|
|00005a50| 0d 00 96 20 f4 20 44 65 | 6d 6f 6e 73 74 72 61 74 |... . De|monstrat|
|00005a60| 65 73 20 55 73 65 72 20 | 53 70 72 69 74 65 73 2e |es User |Sprites.|
|00005a70| 0d 00 a0 05 3a 0d 00 aa | 16 f4 20 50 72 65 43 6f |....:...|.. PreCo|
|00005a80| 72 65 20 53 65 63 74 69 | 6f 6e 2e 0d 00 b4 18 f4 |re Secti|on......|
|00005a90| 20 53 65 74 20 75 70 20 | 65 72 72 6f 72 20 74 72 | Set up |error tr|
|00005aa0| 61 70 2e 0d 00 be 0e ee | 20 85 20 f2 65 72 72 6f |ap......| . .erro|
|00005ab0| 72 0d 00 c8 05 3a 0d 00 | d2 16 f4 20 43 68 6f 6f |r....:..|... Choo|
|00005ac0| 73 65 20 74 68 65 20 6d | 6f 64 65 2e 0d 00 dc 08 |se the m|ode.....|
|00005ad0| eb 20 31 32 0d 00 e6 05 | 3a 0d 00 f0 1f f4 20 44 |. 12....|:..... D|
|00005ae0| 65 63 6c 61 72 65 20 67 | 6c 6f 62 61 6c 20 76 61 |eclare g|lobal va|
|00005af0| 72 69 61 62 6c 65 73 2e | 0d 00 fa 16 78 63 65 6e |riables.|....xcen|
|00005b00| 74 72 65 25 20 20 20 20 | 3d 20 20 36 34 30 0d 01 |tre% |= 640..|
|00005b10| 04 16 79 63 65 6e 74 72 | 65 25 20 20 20 20 3d 20 |..ycentr|e% = |
|00005b20| 20 35 31 32 0d 01 0e 18 | 61 6e 67 6c 65 20 20 20 | 512....|angle |
|00005b30| 20 20 20 20 3d 20 20 33 | 2a af 2f 38 0d 01 18 16 | = 3|*./8....|
|00005b40| 73 73 69 7a 65 25 20 20 | 20 20 20 20 3d 20 20 35 |ssize% | = 5|
|00005b50| 31 32 0d 01 22 05 3a 0d | 01 2c 21 f4 20 52 65 73 |12..".:.|.,!. Res|
|00005b60| 65 72 76 65 20 61 20 75 | 73 65 72 20 73 70 72 69 |erve a u|ser spri|
|00005b70| 74 65 20 61 72 65 61 2e | 0d 01 36 13 de 20 73 75 |te area.|..6.. su|
|00005b80| 73 65 72 25 20 26 31 30 | 30 30 30 0d 01 40 10 de |ser% &10|000..@..|
|00005b90| 20 73 6e 61 6d 65 25 20 | 26 32 30 0d 01 4a 10 de | sname% |&20..J..|
|00005ba0| 20 66 6e 61 6d 65 25 20 | 26 32 30 0d 01 54 05 3a | fname% |&20..T.:|
|00005bb0| 0d 01 5e 05 3a 0d 01 68 | 1f f4 20 53 65 74 20 75 |..^.:..h|.. Set u|
|00005bc0| 70 20 74 68 65 20 63 6f | 6e 74 72 6f 6c 20 62 6c |p the co|ntrol bl|
|00005bd0| 6f 63 6b 2e 0d 01 72 18 | 73 75 73 65 72 25 21 26 |ock...r.|suser%!&|
|00005be0| 30 20 20 20 3d 20 26 31 | 30 30 30 30 0d 01 7c 15 |0 = &1|0000..|.|
|00005bf0| 73 75 73 65 72 25 21 26 | 34 20 20 20 3d 20 26 30 |suser%!&|4 = &0|
|00005c00| 30 0d 01 86 15 73 75 73 | 65 72 25 21 26 38 20 20 |0....sus|er%!&8 |
|00005c10| 20 3d 20 26 31 30 0d 01 | 90 15 73 75 73 65 72 25 | = &10..|..suser%|
|00005c20| 21 26 43 20 20 20 3d 20 | 26 31 30 0d 01 9a 05 3a |!&C = |&10....:|
|00005c30| 0d 01 a4 19 24 73 6e 61 | 6d 65 25 20 20 20 20 20 |....$sna|me% |
|00005c40| 3d 20 22 67 6c 6f 62 65 | 22 0d 01 ae 34 24 66 6e |= "globe|"...4$fn|
|00005c50| 61 6d 65 25 20 20 20 20 | 20 3d 20 22 3c 53 79 73 |ame% | = "<Sys|
|00005c60| 46 58 24 44 69 72 3e 2e | 4d 79 53 70 72 69 74 65 |FX$Dir>.|MySprite|
|00005c70| 73 2e 53 70 72 69 74 65 | 46 69 6c 65 22 0d 01 b8 |s.Sprite|File"...|
|00005c80| 05 3a 0d 01 c2 05 3a 0d | 03 e8 13 f4 20 43 6f 72 |.:....:.|.... Cor|
|00005c90| 65 20 53 65 63 74 69 6f | 6e 2e 0d 03 f2 05 3a 0d |e Sectio|n.....:.|
|00005ca0| 03 fc 05 3a 0d 04 06 40 | f2 64 72 61 77 67 6c 6f |...:...@|.drawglo|
|00005cb0| 62 65 28 78 63 65 6e 74 | 72 65 25 2d 73 73 69 7a |be(xcent|re%-ssiz|
|00005cc0| 65 25 2f 32 2c 79 63 65 | 6e 74 72 65 25 2d 73 73 |e%/2,yce|ntre%-ss|
|00005cd0| 69 7a 65 25 2f 32 2c 61 | 6e 67 6c 65 2c 73 73 69 |ize%/2,a|ngle,ssi|
|00005ce0| 7a 65 25 29 0d 04 10 48 | f2 67 65 74 73 70 72 69 |ze%)...H|.getspri|
|00005cf0| 74 65 28 73 75 73 65 72 | 25 2c 73 6e 61 6d 65 25 |te(suser|%,sname%|
|00005d00| 2c 78 63 65 6e 74 72 65 | 25 2d 73 73 69 7a 65 25 |,xcentre|%-ssize%|
|00005d10| 2f 32 2c 79 63 65 6e 74 | 72 65 25 2d 73 73 69 7a |/2,ycent|re%-ssiz|
|00005d20| 65 25 2f 32 2c 73 73 69 | 7a 65 25 29 0d 04 1a 1e |e%/2,ssi|ze%)....|
|00005d30| f2 73 61 76 65 73 70 72 | 69 74 65 28 73 75 73 65 |.savespr|ite(suse|
|00005d40| 72 25 2c 66 6e 61 6d 65 | 25 29 0d 04 24 05 db 0d |r%,fname|%)..$...|
|00005d50| 04 2e 05 da 0d 04 38 1e | f2 6c 6f 61 64 73 70 72 |......8.|.loadspr|
|00005d60| 69 74 65 28 73 75 73 65 | 72 25 2c 66 6e 61 6d 65 |ite(suse|r%,fname|
|00005d70| 25 29 0d 04 42 51 f2 70 | 6c 6f 74 73 70 72 69 74 |%)..BQ.p|lotsprit|
|00005d80| 65 28 73 75 73 65 72 25 | 2c 73 6e 61 6d 65 25 2c |e(suser%|,sname%,|
|00005d90| 78 63 65 6e 74 72 65 25 | 2d 33 2a 73 73 69 7a 65 |xcentre%|-3*ssize|
|00005da0| 25 2f 34 2c 79 63 65 6e | 74 72 65 25 2d 33 2a 73 |%/4,ycen|tre%-3*s|
|00005db0| 73 69 7a 65 25 2f 34 2c | 33 2a 73 73 69 7a 65 25 |size%/4,|3*ssize%|
|00005dc0| 2f 34 29 0d 04 4c 05 e0 | 0d 04 56 05 3a 0d 04 60 |/4)..L..|..V.:..`|
|00005dd0| 05 3a 0d 27 10 0c dd 20 | f2 65 72 72 6f 72 0d 27 |.:.'... |.error.'|
|00005de0| 1a 17 f4 20 52 65 70 6f | 72 74 73 20 61 6e 20 65 |... Repo|rts an e|
|00005df0| 72 72 6f 72 2e 0d 27 24 | 05 3a 0d 27 2e 05 3a 0d |rror..'$|.:.'..:.|
|00005e00| 27 38 05 3a 0d 27 42 05 | f6 0d 27 4c 13 f1 20 22 |'8.:.'B.|..'L.. "|
|00005e10| 20 61 74 20 6c 69 6e 65 | 20 22 3b 9e 0d 27 56 05 | at line| ";..'V.|
|00005e20| e0 0d 27 60 05 3a 0d 27 | 6a 05 3a 0d 27 74 2c dd |..'`.:.'|j.:.'t,.|
|00005e30| 20 f2 64 72 61 77 67 6c | 6f 62 65 28 6c 65 66 74 | .drawgl|obe(left|
|00005e40| 25 2c 62 6f 74 74 6f 6d | 25 2c 61 6e 67 6c 65 31 |%,bottom|%,angle1|
|00005e50| 2c 73 69 7a 65 25 29 0d | 27 7e 2b f4 20 44 72 61 |,size%).|'~+. Dra|
|00005e60| 77 73 20 61 20 67 6c 6f | 62 65 20 74 6f 20 62 65 |ws a glo|be to be|
|00005e70| 20 75 73 65 64 20 61 73 | 20 61 20 73 70 72 69 74 | used as| a sprit|
|00005e80| 65 2e 0d 27 88 19 ea 20 | 78 63 25 2c 79 63 25 2c |e..'... |xc%,yc%,|
|00005e90| 72 61 64 25 2c 61 6e 67 | 6c 65 32 0d 27 92 05 3a |rad%,ang|le2.'..:|
|00005ea0| 0d 27 9c 1b f4 20 49 6e | 69 74 69 61 6c 69 73 65 |.'... In|itialise|
|00005eb0| 20 76 61 72 69 61 62 6c | 65 73 2e 0d 27 a6 05 3a | variabl|es..'..:|
|00005ec0| 0d 27 b0 05 3a 0d 27 ba | 05 3a 0d 27 c4 1d 78 63 |.'..:.'.|.:.'..xc|
|00005ed0| 25 20 20 20 20 20 3d 20 | 6c 65 66 74 25 20 20 2b |% = |left% +|
|00005ee0| 73 69 7a 65 25 2f 32 0d | 27 ce 1d 79 63 25 20 20 |size%/2.|'..yc% |
|00005ef0| 20 20 20 3d 20 62 6f 74 | 74 6f 6d 25 2b 73 69 7a | = bot|tom%+siz|
|00005f00| 65 25 2f 32 0d 27 d8 15 | 72 61 64 25 20 20 20 20 |e%/2.'..|rad% |
|00005f10| 3d 20 73 69 7a 65 25 2f | 34 0d 27 e2 05 3a 0d 27 |= size%/|4.'..:.'|
|00005f20| ec 18 61 6e 67 6c 65 32 | 20 20 3d 20 61 6e 67 6c |..angle2| = angl|
|00005f30| 65 31 2d af 2f 32 0d 27 | f6 05 3a 0d 28 00 16 f4 |e1-./2.'|..:.(...|
|00005f40| 20 44 72 61 77 20 67 6c | 6f 62 65 20 61 78 69 73 | Draw gl|obe axis|
|00005f50| 2e 0d 28 0a 07 e6 20 37 | 0d 28 14 29 c8 9d 20 c8 |..(... 7|.(.).. .|
|00005f60| 90 20 78 63 25 2c 79 63 | 25 2c 73 69 7a 65 25 2f |. xc%,yc|%,size%/|
|00005f70| 32 2c 73 69 7a 65 25 2f | 36 34 2c 61 6e 67 6c 65 |2,size%/|64,angle|
|00005f80| 31 0d 28 1e 05 3a 0d 28 | 28 1d f4 20 44 72 61 77 |1.(..:.(|(.. Draw|
|00005f90| 20 67 6c 6f 62 65 20 62 | 6f 74 74 6f 6d 20 68 61 | globe b|ottom ha|
|00005fa0| 6c 66 2e 0d 28 32 07 e6 | 20 34 0d 28 3c 0d ec 20 |lf..(2..| 4.(<.. |
|00005fb0| 78 63 25 2c 79 63 25 0d | 28 46 2f ec 20 20 20 20 |xc%,yc%.|(F/. |
|00005fc0| 20 78 63 25 2d 72 61 64 | 25 2a 9b 28 61 6e 67 6c | xc%-rad|%*.(angl|
|00005fd0| 65 32 29 2c 79 63 25 2d | 72 61 64 25 2a b5 28 61 |e2),yc%-|rad%*.(a|
|00005fe0| 6e 67 6c 65 32 29 0d 28 | 50 2f f0 20 26 42 35 2c |ngle2).(|P/. &B5,|
|00005ff0| 78 63 25 2b 72 61 64 25 | 2a 9b 28 61 6e 67 6c 65 |xc%+rad%|*.(angle|
|00006000| 32 29 2c 79 63 25 2b 72 | 61 64 25 2a b5 28 61 6e |2),yc%+r|ad%*.(an|
|00006010| 67 6c 65 32 29 0d 28 5a | 05 3a 0d 28 64 1b f4 20 |gle2).(Z|.:.(d.. |
|00006020| 44 72 61 77 20 73 61 74 | 65 6c 6c 69 74 65 20 6f |Draw sat|ellite o|
|00006030| 72 62 69 74 2e 0d 28 6e | 07 e6 20 36 0d 28 78 25 |rbit..(n|.. 6.(x%|
|00006040| c8 9d 20 78 63 25 2c 79 | 63 25 2c 73 69 7a 65 25 |.. xc%,y|c%,size%|
|00006050| 2f 38 2c 73 69 7a 65 25 | 2f 32 2c 61 6e 67 6c 65 |/8,size%|/2,angle|
|00006060| 31 0d 28 82 05 3a 0d 28 | 8c 1a f4 20 44 72 61 77 |1.(..:.(|... Draw|
|00006070| 20 67 6c 6f 62 65 20 74 | 6f 70 20 68 61 6c 66 2e | globe t|op half.|
|00006080| 0d 28 96 07 e6 20 34 0d | 28 a0 0d ec 20 78 63 25 |.(... 4.|(... xc%|
|00006090| 2c 79 63 25 0d 28 aa 2f | ec 20 20 20 20 20 78 63 |,yc%.(./|. xc|
|000060a0| 25 2b 72 61 64 25 2a 9b | 28 61 6e 67 6c 65 32 29 |%+rad%*.|(angle2)|
|000060b0| 2c 79 63 25 2b 72 61 64 | 25 2a b5 28 61 6e 67 6c |,yc%+rad|%*.(angl|
|000060c0| 65 32 29 0d 28 b4 2f f0 | 20 26 42 35 2c 78 63 25 |e2).(./.| &B5,xc%|
|000060d0| 2d 72 61 64 25 2a 9b 28 | 61 6e 67 6c 65 32 29 2c |-rad%*.(|angle2),|
|000060e0| 79 63 25 2d 72 61 64 25 | 2a b5 28 61 6e 67 6c 65 |yc%-rad%|*.(angle|
|000060f0| 32 29 0d 28 be 05 3a 0d | 28 c8 05 3a 0d 28 d2 05 |2).(..:.|(..:.(..|
|00006100| 3a 0d 28 dc 05 3a 0d 28 | e6 05 3a 0d 28 f0 05 e1 |:.(..:.(|..:.(...|
|00006110| 0d 28 fa 05 3a 0d 29 04 | 31 dd 20 f2 67 65 74 73 |.(..:.).|1. .gets|
|00006120| 70 72 69 74 65 28 75 73 | 65 72 25 2c 6e 61 6d 65 |prite(us|er%,name|
|00006130| 25 2c 6c 65 66 74 25 2c | 62 6f 74 74 6f 6d 25 2c |%,left%,|bottom%,|
|00006140| 73 69 7a 65 25 29 0d 29 | 0e 28 f4 20 50 69 63 6b |size%).)|.(. Pick|
|00006150| 20 20 75 70 20 61 20 73 | 70 72 69 74 65 20 66 72 | up a s|prite fr|
|00006160| 6f 6d 20 74 68 65 20 73 | 63 72 65 65 6e 2e 0d 29 |om the s|creen..)|
|00006170| 18 26 f4 20 53 61 76 65 | 20 69 74 20 69 6e 20 74 |.&. Save| it in t|
|00006180| 68 65 20 75 73 65 72 20 | 73 70 72 69 74 65 20 61 |he user |sprite a|
|00006190| 72 65 61 2e 0d 29 22 1f | ea 20 72 69 67 68 74 25 |rea..)".|. right%|
|000061a0| 2c 74 6f 70 25 2c 67 65 | 74 25 2c 70 61 6c 65 74 |,top%,ge|t%,palet|
|000061b0| 74 65 25 0d 29 2c 05 3a | 0d 29 36 1b f4 20 49 6e |te%.),.:|.)6.. In|
|000061c0| 69 74 69 61 6c 69 73 65 | 20 76 61 72 69 61 62 6c |itialise| variabl|
|000061d0| 65 73 2e 0d 29 40 15 67 | 65 74 25 20 20 20 20 20 |es..)@.g|et% |
|000061e0| 3d 20 31 36 2b 32 35 36 | 0d 29 4a 10 70 61 6c 65 |= 16+256|.)J.pale|
|000061f0| 74 74 65 25 20 3d 20 31 | 0d 29 54 05 3a 0d 29 5e |tte% = 1|.)T.:.)^|
|00006200| 1e 72 69 67 68 74 25 20 | 20 20 3d 20 6c 65 66 74 |.right% | = left|
|00006210| 25 20 20 2b 73 69 7a 65 | 25 2d 31 0d 29 68 1e 74 |% +size|%-1.)h.t|
|00006220| 6f 70 25 20 20 20 20 20 | 3d 20 62 6f 74 74 6f 6d |op% |= bottom|
|00006230| 25 2b 73 69 7a 65 25 2d | 31 0d 29 72 05 3a 0d 29 |%+size%-|1.)r.:.)|
|00006240| 7c 05 3a 0d 29 86 05 3a | 0d 29 90 05 3a 0d 29 9a ||.:.)..:|.)..:.).|
|00006250| 05 3a 0d 29 a4 48 c8 99 | 20 22 4f 53 5f 53 70 72 |.:.).H..| "OS_Spr|
|00006260| 69 74 65 4f 70 22 2c 67 | 65 74 25 2c 75 73 65 72 |iteOp",g|et%,user|
|00006270| 25 2c 6e 61 6d 65 25 2c | 70 61 6c 65 74 74 65 25 |%,name%,|palette%|
|00006280| 2c 6c 65 66 74 25 2c 62 | 6f 74 74 6f 6d 25 2c 72 |,left%,b|ottom%,r|
|00006290| 69 67 68 74 25 2c 74 6f | 70 25 0d 29 ae 05 3a 0d |ight%,to|p%.)..:.|
|000062a0| 29 b8 05 e1 0d 29 c2 05 | 3a 0d 29 cc 1e dd 20 f2 |)....)..|:.)... .|
|000062b0| 73 61 76 65 73 70 72 69 | 74 65 28 75 73 65 72 25 |savespri|te(user%|
|000062c0| 2c 6e 61 6d 65 25 29 0d | 29 d6 29 f4 20 53 61 76 |,name%).|).). Sav|
|000062d0| 65 73 20 74 68 65 20 75 | 73 65 72 20 73 70 72 69 |es the u|ser spri|
|000062e0| 74 65 20 61 72 65 61 20 | 74 6f 20 64 69 73 63 2e |te area |to disc.|
|000062f0| 0d 29 e0 0b ea 20 73 61 | 76 65 25 0d 29 ea 1b f4 |.)... sa|ve%.)...|
|00006300| 20 49 6e 69 74 69 61 6c | 69 73 65 20 76 61 72 69 | Initial|ise vari|
|00006310| 61 62 6c 65 73 2e 0d 29 | f4 16 73 61 76 65 25 20 |ables..)|..save% |
|00006320| 20 20 20 3d 20 20 31 32 | 2b 32 35 36 0d 29 fe 05 | = 12|+256.)..|
|00006330| 3a 0d 2a 08 26 c8 99 20 | 22 4f 53 5f 53 70 72 69 |:.*.&.. |"OS_Spri|
|00006340| 74 65 4f 70 22 2c 73 61 | 76 65 25 2c 75 73 65 72 |teOp",sa|ve%,user|
|00006350| 25 2c 6e 61 6d 65 25 0d | 2a 12 05 3a 0d 2a 1c 05 |%,name%.|*..:.*..|
|00006360| e1 0d 2a 26 05 3a 0d 2a | 30 1e dd 20 f2 6c 6f 61 |..*&.:.*|0.. .loa|
|00006370| 64 73 70 72 69 74 65 28 | 75 73 65 72 25 2c 6e 61 |dsprite(|user%,na|
|00006380| 6d 65 25 29 0d 2a 3a 24 | f4 20 4c 6f 61 64 73 20 |me%).*:$|. Loads |
|00006390| 61 20 73 70 72 69 74 65 | 20 66 69 6c 65 20 66 72 |a sprite| file fr|
|000063a0| 6f 6d 20 64 69 73 63 2e | 0d 2a 44 0b ea 20 6c 6f |om disc.|.*D.. lo|
|000063b0| 61 64 25 0d 2a 4e 1b f4 | 20 49 6e 69 74 69 61 6c |ad%.*N..| Initial|
|000063c0| 69 73 65 20 76 61 72 69 | 61 62 6c 65 73 2e 0d 2a |ise vari|ables..*|
|000063d0| 58 16 6c 6f 61 64 25 20 | 20 20 20 3d 20 20 31 30 |X.load% | = 10|
|000063e0| 2b 32 35 36 0d 2a 62 05 | 3a 0d 2a 6c 26 c8 99 20 |+256.*b.|:.*l&.. |
|000063f0| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 6c 6f |"OS_Spri|teOp",lo|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
